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HOW TO USE THIS BOOK 


This publication provides information describing the internal 
organization and logic of the loader. Other publications which 
should be read for an understanding of the loader are: 


° MVS/7370 Linkage Editor and Loader, G6C26-4061 
° OS/VS - DOS/VSE - VM/370 Assembler Language, GC33~4010 


° Assembler _ H Version 2 Application Programming: Language 
Reference, GC26-4037 


You should also refer to the corequisite publication: 


° OS/VS2 System Programming Library: Debugging Handbook, 
Volumes 1 through 3, GC28~-1047 through G6C28-1049 


This publication has six sections, an appendix, anda list of 
abbreviations and acronyms. 


"Introduction™ describes the loader as a whole, including its 
relationship to the operating system. The major divisions of 
the program and the relationship between them are also described 
in this section. 


"Method of Operation™ provides: (Ca) an overview of, and an 
introduction to, the logic of the loader, and (b) detailed 
descriptions of specific operations. Included are text and 
operation diagrams. The latter emphasize the flow of data 
within the loader. The text and diagrams are correlated through 
references of two levels. That is, the operation diagram for a 
function has an alphameric identification; within the diagram, 
specific points of reference have alphabetic labels. The text 
that describes the same function refers to the operation diagram 
as a whole and to the specific labeled references where 
appropriate. For example, the discussion of initialization 
refers to operation Diagram Bl. Within the discussion, 
reference (B) refers to point (B) in Diagram Bl. Also included 
in "Method of Operation” on page 9 are examples of the internal 
tables at strategic points in loader processing. Both the 
diagrams and the table illustrations are designed as aids to 
quick recall. 


"Organization of the Loader” describes the organization of the 
loader and the control flow within it. 


"Microfiche Directory" directs the reader to named areas of code 
in the program listing, which is contained on microfiche cards. 


"Data Areas" illustrates the layout of tables and control blocks 
used by the loader. These layouts may not be essential for an 
understanding of the logic of the program, but are essential for 
analysis of storage dumps. 


"Diagnostic Aids™ includes the general register contents at 
entry to program components, definitions of the internal error 
codes, anda list of serviceability aids available with the 
loader. 
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"Error Messages, etc.” includes tnput conventions, record 


formats, an Error Message/Issuer cross-reference table, and a 
description of the compiler/loader interface for passed data ) 
sets. 


"List of Abbreviations and Acronyms" lists the abbreviations and 
acronyms used in the manual. 


If you require more detailed information, see the comments and 
coding in the loader program listing. 
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INTRODUCTION 


PURPOSE 


FUNCTIONS 


This section provides a general description of the loader. 
Included are the purpose and functions of the program, its 
physical and environmental characteristics, and operational 
considerations necessary for its use. Also discussed in this 
section is the generalized theory of loading. 


The purpose of the loader is to combine input object and load 
modules into an executable program in virtual storage. In this, 
the loader performs the basic functions of the linkage editor 
and program fetch to obtain high-performance loading. (The 
loader can be used only when special linkage editor processing, 
such as overlaying modules, is not required.) 


Use of the loader can provide advantages of increased system 
throughput and conservation of auxiliary storage space. System 
throughput can be increased through: 


e Elimination of scheduler overhead, since loading and 
execution occur ina single job step 

e Elimination of linkage editor [I/0 for intermediate and final 
output 

e Elimination of certain linkage editor functions such as 


control statement processing and overlay structuring 


e Reduction of time required to read input through improved 
buffering techniques 


e Reduction of time required for library search through use of 
link pack resident modules 


e Elimination of time required to read input from an external 
device through use of an internal input data area prepared 
by a compiler 


Auxiliary storage space is conserved through: 


e Deferring inclusion of processor library routines until load 
time, thus reducing space required for the program. (This 
applies to a production environment in which jobs are 
selected from a job library.) 


® Eliminating space needed for the linkage editor intermediate 
and output data sets. 


The loader performs the basic logical functions of the linkage 
editor and of program fetch. Like the linkage editor, the 
loader combines and links the input modules. In addition, the 
loader assigns actual machine addresses to the resulting program 
and then passes control directly to the program for execution. 
In this, the loader functions as program fetch does. 


As part of the link-loading procedure, the loader also 


automatically deletes duplicate copies of a module and can 
include modules from a system library. 


Introduction 1 





This document contains restricted materials of IBM. © Copyright IBM Corp. 1972,1983 
LY26-3922-0 


VIRTUAL STORAGE REQUIREMENTS 


Loader operation requires about 21K bytes of virtual storage.!? 
(This amount does not include the storage for the loaded program | 
and the condensed symbol table.) The storage for loader 

operation includes that for loader code (about 14K bytes), for 

the data management access methods (Cabout 6K bytes), and for 

loader buffers and tables Cabout 3K bytes). If the access 

methods are resident and if the loader code is resident in the 

link pack area, part of the loader storage may be allocated from 
system storage. 


Figure 1 shows an example of loader structure in virtual 





storage. 
High 
Address 
Loader Con- { . Freed after pro- 
trol GETMAIN Register save area for LOAD of Loader (72 bytes) BramdeneCOHIGA 
LOADER (Processing) 
Freed before pro- 
gram execution 
TABLES (Dynamic) 
Loader 
Processor Loaded Program 
GETMAIN 


Freed after pro- 
gram execution 


Descriptive information about loaded program 


LOADER (CON TROL) 


OPERATING SYSTEM 


CONTROL PROGRAM 





Low 


Address 
Figure 1. Loader Storage Layout 


1 The actual amount required depends on the type of input (for Jo 
example, input produced by the PL/I compiler requires a 
minimum of 1LOK bytes for loader tables). 


2 MVS/370 Loader Logic 


C 


This document contains restricted materials of IBM. © Copyright IBM Corp. 1972,1983 


LY26-3922-0 


ENVIRONMENT 


The loader can be used in batch mode or it can also be invoked 
under the time sharing option (TSO). 


It can be used in one of three ways: 


1. As a job step, when the loader is specified on an EXEC job 
control statement in the input stream. 


2. As a subprogram, via the execution of a LOAD macro 
instruction, a LINK macro instruction, or an XCTL macro 
instruction. 


3. As a subtask, in multitasking systems, via execution of an 
ATTACH macro instruction. 


Loader operation requires access to a primary input source, the 


SYSLIB data set. Input may be from a card reader, magnetic 


tape, or a direct access device, or it may be a concatenation of 
data sets from different types of devices. Input may aiso be an 
internal input data area prepared by a compiler. 


An automatic search of a system library can occur to complete 
the input. This requires use of the SYSLIB data set. It is 
defined only as a partitioned data set. SYSLIB may also be 
concatenated; however, SYSLIB input consists of object modules 
only or load modules only. 


When the link pack area is available, the loader can include in 
the loaded program resident modules listed in the contents 
directory entry queue. 


The loader uses the SYSLOUT data set for both diagnostic 
messages and module maps and the SYSTERM data set for diagnostic 
messages only. These data sets may be used in conjunction with 
each other or separately. 


PHYSICAL CHARACTERISTICS 


The loader consists of a control portion and a processing 
portion. The control portion handles linkages to and from the 
processing portion, which performs the actual program loading, 
and to and from the loaded program for its execution. The 
relationship between the portions of the loader is illustrated 
in Figure 2 on page 4. 


The loader consists of two loads: the first is module HEWLCTRL, 
the control portion; and the other comprises control sections 
HEWLDDEF, HEWLIOCA, HEWLRELO, HEWLIDEN, and HEWLLIBR, which 
together perform program loading. Because of the 
interrelationships among module functions, the loader is not a 
candidate for overlay structuring. 


OPERATIONAL CONSTDERATIONS 


Loader operation depends on the type of input received and on 
user options that may be specified. 


The input to the loader may be load modules produced by the 
linkage editor and/or object modules produced by the following 
language processors: ALGOL, COBOL, FORTRAN, PL/I, RPG, and 
Assembler.* Input may be from an external device or it may be 
one or more internal object modules, that is, a data area that 
resides in virtual storage and consists of contiguous object 
module records. If input is an internal data area, the object 
module records containing the instructions and data of the 
program (text) can be omitted from the data area itself and 


2 If the input consists only of load modules, the user must 
specify the loaded program's entry point. 
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HEWLOADR 


Processing Portion 


HEWLDRGO (ALIAS LOADER) 


Control Portion of Loader 


LOAD EP = HEWLOAD 
CALL HEWLOAD 


of Loader 


(Performs program loading) 


RETURN 





R#] = program name 


DELETE EP = HEWLOAD 


LOADED PROGRAM 
ATTACH 


WAIT 
DETACH 


RETURN To Caller 





RETURN 


Figure 2. Loader Control Logic Flow 


replaced by passing a pointer to the text. The loader then 
performs its usual functions of relocation and linkage on the 
text without having to read or move it. 


If the loader is processing an internal data area, input from an 
external device cannot be concatenated to it. 


INPUT MODULE STRUCTURE 


Object modules and load modules have basically the same logical 
structure (see Figure 3 on page 5). =Each consists of: 


° Control dictionaries, containing the information necessary 
to resolve symbolic cross-references between control 
sections of different modules. 


° Text, containing the instructions and data of the program. 
If an internal object module is being processed, text 
prepared by a compiler may be omitted and replaced by a 
pointer to its location. 


e End-of-module indication CEND statement in object modules; 
EOM indicator in load modules). 
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Linkage Editor Input Linkage Editor Output 
Object Module Load Module 


Linkage 
Editor Control 
EOM/RLD 





Figure 3. Object Module and Load Module Structure 


The instructions and data of any module may contain symbolic 
references to specific areas of code. The symbols may be 
defined and referred to in the same module, or may be defined in 
one module and referred to in another. Thus, symbolic 
references are either internal or external with respect to the 
module in which they occur. A symbol that refers to external 
code is called an external reference (ER). External and 
internal references are made through address constants. 


The loader performs its function of changing all address 
constants to actual machine addresses by manipulating the input 
modules’ control dictionaries. 


Object modules usually contain two control dictionaries: an 
external symbol dictionary CESD) and a relocation dictionary 
(RLD). If the module contains no relocatable address constants, 
an RLD 1s not present. 


Load modules are a composite of object modules, and, therefore, 
contain a composite ESD (CESD). Load modules contain RLDs also, 
unless there are no relocatable address constants. General 
descriptions of the control dictionaries follow. For detailed 
descriptions, see the Appendix. 
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External Symbol Dictionary (ESD) 


The external symbol dictionary contains entries for all external 
symbols defined or referred to within a module. Each entry 
indicates the symbol and its type and gives its position, if 
any, within the module. For example, there is an ESD entry for 
each control section, entry point, common area, and external 
dummy section. CAn external dummy section defines a 
displacement within an area, obtained during execution of the 
input program via a GETMAIN macro instruction. External DSECTs 
are also referred to as pseudo registers.) 


Relocation Dictionary (RLD) 


The relocation dictionary C(RLD) contains at least one entry for 
every relocatable address constant (thus, for every external and 
internal reference) in a module. An RLD entry identifies an 
address constant by tndicating both its location within a 
control section and the external symbol Cin the ESD) whose value 
determines the value of the address constant. 


INTERRELATIONSHIP OF CONTROL DICTIONARIES 


The control dictionaries and associated text are related through 
a system of numbers known as ESD identifiers (ESD IDs). An ESD 
ID is assigned to each external symbol according to its 
sequential appearance in an object module. The external symbol 
dictionary entries, as created by a compiler or an assembler, 
have the same sequential order, so the ESD ID gives the 
dictionary entry number of an external symbol.* (The linkage 
editor renumbers the ESD IDs to maintain the ordered 
relationship when combining modules into a load module.) 


Although the ESD IDs do not appear in the ESD entries, they are 
used in label definitions, text items, and RLD entries to refer 
to the symbols in the ESD. 


In the RLD entries, the ESD IDs are used to show two 
relationships between the RLD and ESD entries, as follows: 


e The RLD relocation pointer (R pointer) gives the ESD ID for 
the symbol referred to by the address constant. 


e The RLD position pointer (P pointer) gives the ESD ID for 
the CSECT in which the address constant occurs. 


Figure 4 on page 7 illustrates the two cases of RLD pointers. 
The text of CSECT A contains two address constants, X and Y. X 
refers to a symbol within CSECT A. Therefore, both pointers of 
its associated RLD entry give the ESD ID of CSECT A. The value 
field of Y, however, refers to a symbol ina different control 
section, CSECT C. Thus, the R pointer of the entry for Y gives 
the ESD ID for CSECT C, the external reference; the P pointer 
gives the ESD ID for CSECT A. 


3 In an object module, an ESD item with type=LD can not have 
associated text or dependent address constants (see "ESD 
Processing") and so is excluded from the numbering system. 
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LOADER OPTIONS 


r= Te [a 
2 
aa 

cbse se 
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| 
| 
| 
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| 
| 
| 
| 


\ 


Address 

















Note: The module above includes an external symbol dictionary, text, and a relocation dictionary. 


The entry in the ESD for CSECT C results from the reference to CSECT C in the text of CSECT A. 
This reference is at location 400. (CSECT B has no relocatable address constants.) 


Figure 4. Example of an Input Module 


User options may be specified by parameters listed on the EXEC 
job control statement* or may be passed internally by a program 
requesting the loader via LINK, LOAD, ATTACH, or XCTL macro 
instruction.> If the options are not user specified, the 
defaults provided by the loader are used. 


If the options are passed internally, the user can also provide 
alternatives for the standard ddnames and for the standard 
SYSLIN and SYSLIB DCBs. 


See JCL manual. 


See System Programming Library: Supervisor Services and 
Macro Instructions. 
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Figure 5 describes the loader options. The parameters used are 
listed with the associated options. For some options, there are 
different parameters to specify either the choice or the refusal ) 
of the option. For example, NOCALL signifies that the library 

call option (CALL) is not to be used. (In this case, the third 
possible parameter has been retained for compatibility with the 
linkage editor option NCAL.) Figure 5 also indicates the 

default options. 


| RES|NORES The loader searches the link pack area queue for 
resident modules after primary input is complete, 
but before the SYSLIB data set is opened. 
MAP | NOMAP The loader produces a list of external names and 
their actual storage addresses. 


The loader performs an automatic search of the 
SYSLIB data set for unresolved external names. 


LET|NOLET The loader passes control to the loaded program 
despite the occurrence of a severity 2 error 
condition during loading. 

SIZE= Specifies the maximum amount of dynamic storage to SIZE=300K 
be obtained for loader processing. 

Specifies an external name to be used as the entry No 
point of the loaded program. default! 

PRINT| The loader attempts to open the SYSLOUT data set PRINT 

NOPRINT for diagnostic output. 

TERM | Error messages are directed to the SYSTERM data NOTERM 

NOTERM set as well as the SYSLOUT data set. 

Specifies the name to be used as the name of the 
loaded program. 


Figure 5. Loader Options 


























Note to Figure 5: 


1 The loader assigns an entry point to the loaded program if 
no name was specified. 


GENERAL THEORY OF OPERATION 


In processing the input modules, the loader assigns 
virtual-storage addresses to the control sections to be included 
in the loaded program and resolves external references in the 
CSECTs. 


Because each input module has an origin that was assigned 
independently by a language translator, the order of the 
addresses in the input is unpredictable. (Two input modules, 
for example, may have the same origin.) The loader assigns an 
address to the first control section and then assigns storage 
addresses, relative to this origin, to all other CSECTs. 


Because cross-references between CSECTs in different modules are 


symbolic, they are resolved (translated into machine addresses) 
relative to the virtual-storage addresses assigned to the loaded 


program. 
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METHOD OF OPERATION 


STEPS OF THE LOADER 


Initialization 


This section describes the logic of the loader. It contains an 
introduction that emphasizes the flow of primary data and 
control information through tables and buffers. This section 
also contains detailed functional descriptions of the loader. 


The logic introduction refers to the operation diagrams 
associated with a particular function. The detailed functional 
descriptions refer, through lettered references, for example, 
CA), to a portion of a diagram, to the corresponding steps of a 
function as shown in the operation diagrams. (The diagrams 
follow the text of this section.) 


At the end of this section are illustrations of the internal 
loader tables at strategic points in processing (Figure 13 on 
page 25). These illustrations stress the changes to data; the 
diagrams stress movement of data. Used together, the two sets 
of figures offer quick recall. 


OPERATION 


The loader control portion, which acts as an interface with the 
supervisor, loads the processing portion of the loader and 


passes to it the parameter list received. The system interface 
is shown in "Diagram Al. Overall Loader Operation” on page 47 
and "Diagram A2d. Loader Invocation” on page 48. The loader then 
performs loading through the following basic functions: 

e Initialization 

° Input control and buffer allocation 

e Primary input processing 

* Secondary input processing 

e Final processing 


* End of loading 


After the processing portion has completed these functions, the 
loader control portion passes control to the loaded program for 
execution. 


The overall flow of data and control during loading is shown in 
"Diagram Al. Overall Loader Operation" on page 47. 


When the loader begins processing, it performs initialization in 
preparation for all subsequent processing. The operations 
included in initial processing are: 


e Analyzing control information 
° Initializing virtual storage 
e Initializing DCBs and opening data sets 


"Diagram Bl. Loader/Scheduler Interface and Initialization” on 
page 49 shows initialization processing. 
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Input Control and Buffer Allocation 


The loader reads input and allocates buffers as required for the 
current input module. Object modules from SYSLIN Cprimary input 
data set) and from SYSLIB (secondary input data set) are read 
into the object module buffers. (However, if input jis an 
internal data area, buffers are not allocated and the data area 
itself is considered one buffer.) Control information from load 
modules Cincluding ESD and RLD records) jis read into the RLD 
buffer. Text from load modules, is read directly into the 
loaded program's storage area. "Diagram Cl. Primary Input 
Control and Buffer Allocation™ on page 50 shows input control 
and buffer allocation. 


Primary Input Processing 


The loader performs the following processing for all SYSLIN 
modules. CAll overlay and scatter control statements from load 
modules and SYM records are ignored.) "Diagram Dl. Object 
Module Processing™ on page 51 and “Diagram D2. Load Module 
Processing™ on page 52 show primary input processing. 


External Symbol Dictionary Processing 


The ESD records from object modules and CESD records from load 
modules describe symbols that have been defined for external 
use. The loader makes entries for the symbols in the CESD and 
also makes entries in the translation table to allow the 
translation of the input ESD IDs to CESD addresses. The loader 
calculates storage addresses and stores them in the CESD 
entries. "Diagram D3. ESD Record Processing (Generalized)™ on 
page 53 through "Diagram D6. Example of ESD ID Translation" on 
page 56 show external symbol dictionary processing. 


Text Record Processing 


For object modules, the loader translates the ID of a text 
record to the proper CESD entry address. The CESD entry 
contains the storage address assigned to the CSECT. When the 
loader finds the address for the text, it moves the text from 
the object module's buffer to the loaded program's storage. For 
load modules, the loader translates the IDs of all CSECTsS ina 
text record and thus finds their assigned virtual-storage 
addresses. The loader reads the record directly into the loaded 
program's storage area; CSECTs at the end of the record that are 
to be deleted are not read; CSECTs within the record that are to 
be deleted are overlaid when the CSECTs that are to be kept are 
compressed. "Diagram D7. Object Module Text Processing™ on page 
57 and "Diagram D&. Load Module Text Processing™ on page 58 show 
text record processing. 


Relocation Dictionary Processing 


The loader builds its RLD table from information contained in 


the RLD records. It processes the RLD records of object modules 
from the object module buffer and those of load modules from the 
RLD buffer. The loader uses the relocation and position (R and 


P) pointers to determine the addresses of the address constants 
Cadcons) and uses the flag field to determine the method of 
address constant relocation required. "Diagram D9. RLD Record 
Processing" on page 59 shows relocation dictionary processing. 


Address Constant Relocation Processing 


When external references in the CESD are resolved, the loader 
uses the RLD table entries chained to the CESD entry to relocate 
the related address constants in the loaded text. 
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Secondary Input Processing 


Final Processing 


If there are unresolved external references after all SYSLIN 
input has been processed, the loader tries to resolve them from 
system library routines. If RES is specified, the loader first 
tries to resolve the references from link pack area routines. 
When this is possible, the loader uses the addresses of the 
referenced routines in the link pack area to resolve the adcons 
used to symbolically refer to them. Finally, the loader opens 
the SYSLIB data set, if necessary. The loader then loads any 
library modules that can be used to resolve ERs in the loaded 
program. The modules are located via the BLDL and FIND macro 


instructions. The loader processes the modules, depending on 
whether they are object or load modules, in the same manner as 
it processes primary input. "Diagram El. Secondary Input 


Processing" on page 60 shows secondary input processing. 


After processing all the input for the loaded program, the 
loader performs the following: assigns addresses for the common 
areas and for displacements in the external dummy section, 
15sues messages for unresolved ERs, and determines the address 
of the loaded program's entry point. 


Identifying Loaded Program 


End of Loading 


If program loading is successful, the loader issues an IDENTIFY 
macro instruction to pass the name of the program to be executed 
to the control program.® At this time, a condensed symbol table 
may also be constructed for use during the program's execution 
by the test facilities available under the Time Sharing Option. 


Before ending loader processing, the loader performs the 
following: writes out the diagnostic message dictionary and any 
remaining diagnostic messages, closes data set DCBs, sets up 
return information, and frees storage not required for the 
loaced program. 


INITIALIZATION (HEWLIOCA) 


When the loader begins processing, it analyzes control 
information, performs initialization of main storage and of data 
sets, and allocates initial buffers for the data sets. See 
eueaee ee Bl. Loader/Scheduler Interface and Initialization" on 
page ; 


ANALYZING CONTROL INFORMATION 


Loader operation depends on the control information, consisting 
of the options, ddnames of the data sets, and the data control 
block addresses, to be included in loader processing. The 
loader uses the information passed by the user or the defaults. 
(The defaults are contained in the control section HEWLDDEF. ) 


CA) To analyze the control information, the loader obtains a 
temporary work area, INITMAIN. (See "Data Areas" on page 73 for 
the contents of INITMAIN.) The loader saves, in the temporary 
work area, the default ddnames and option indicators. An 
EXTRACT macro instruction is then issued to determine whether 
the loader is currently operating under the Time Sharing Option, 
and an indicator is set in INITMAIN. If the processing portion 


This processing is performed only when the processing 
portion of the loader is invoked, either directly or by the 
control portion of the loader, by the name HEWLOAD. 
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of the loader was invoked through the entry point HEWLOAD, 

another indicator is set to show that identification of the ' 
loaded program is desired. The loader then scans the user's 

options and resets the default indicators in INITMAIN, when J 
necessary. 


If the SIZE option is specified, the associated user's value 
replaces the default value. However, if the option is 
incorrectly specified, the default value is used. 


If the EP option is specified, the associated entry point name 
is saved in INITMAIN. 


If the NAME option is specified, the associated program name is 
saved in INITMAIN. Otherwise, the default name **GO is used. 


The loader then checks for user-specified ddnames to be used in 
specifying data sets. If present, these ddnames also replace 
the default names. 


Finally, a check is made for the addresses of alternates for the 
data control blocks. Both addresses, if specified, must be 
24-bit-only addresses; otherwise, they are ignored. A SYSLIN 
control block is accepted if it describes an internal data area. 
The address of this control block is saved, and an indicator for 
an internal SYSLIN data area is set in INITMAIN. (CThe SYSLIN 
control block, which is not a data control block, is described 
in "Internal SYSLIN Control Block"under "Compiler/Loader 
Interface for Passed Data Sets" in the Appendix.) An alternate 
SYSLIB DCB is accepted if it describes a data sat that has been 
opened. The address of this DCB is also saved and an indicator 
for an open library data set is set in INITMAIN. 


INITIALIZING VIRTUAL STORAGE 


CB) Using the GETMAIN macro instruction, the loader obtains the 
required storage from the supervisor. The request is 
conditional and variable. The maximum amount requested is that 
specified by the SIZE option; the minimum is 2K bytes. If the 
supervisor does not return storage, the loader then issues an 
unconditional GETMAIN request for the minimum. If 2K bytes of 
storage is still unavailable, an 804 or 80A system abend occurs. 


If the supervisor returns virtual storage space, the loader 
establishes its permanent communication area. (The 
communication area is described in "Data Areas" on page 73.) 
The loader then moves the information stored in INITMAIN to the 
communication area. 


Save areas for use during loading are allocated and chained 
backward and forward. Finally, the INITMAIN area is returned to 
the system via a FREEMAIN macro instruction. The area is then 
available for data management functions required for loading. 


READYING DATA SETS 


(C) The loader performs initialization requisite to use of its 
data sets. If the TERM option has been specified, space 15s 
reserved for a SYSTERM DCB, two DECBs, and two buffers. Unless 
an internal SYSLIN data set has been passed to the loader, a 
SYSLIN DCB must be prepared and opened. Similarly, unless the 
NOPRINT option has been specified, a SYSLOUT DCB must be 
prepared and opened. 


DCBs for the data sets are constructed using a model DCB 
contained in the loader. The ddnames and basic attributes are 
placed into the constructed DCBs before the data sets are 
opened. 


During opening, other data set attributes are checked. These ») 
include record format, record and block sizes, and the number of 
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buffers to be allocated for the data set. If record and block 
sizes are not defined, the loader uses the following defaults: 


® For SYSLIN, both values are set to 80. 


e For SYSLOUT, both values are normally set to 121. However, 
if the loader is operating in time-sharing mode, the record 
length of the SYSLOQUT data set is set to 81 so output can be 
easily directed to a terminal. 


Because the loader allocates buffers for its data sets, it does 
not require the buffer allocation supplied by the Open routine. 
The loader indicates this by setting the DCBBUFNO field in the 
DCB to zero. The value that was found in the DCBBUFNO field is 
stored in DCBNCP. 


The loader determines whether the data sets opened successfully. 
If SYSLOUT is open, the loader allocates the number of buffers 
and DECBs specified in the DCBNCP field in the DCB, and sets a 
flag indicating that the SYSLOUT data sat is usable. The 
diagnostic output page heading is set up and printed. The 
loader then constructs, in the SYSLOUT buffer, a list of the 
options used, the amount of virtual storage received for loader 
processing, and the entry point and program names, if specified. 
After printing this list, the loader prints out any invalid 
options received and any errors encountered during the open 
procedure. Finally, if the MAP option was chosen, the MAP 
heading is constructed and printed. 


If the opening of SYSLOUT was not successful, the MAP option 
indicator is set off and the storage allocated for the data 
set's DCB is released. 


Next, the loader determines whether the SYSLIN data set opened 
successfully. If an error occurred during opening of SYSLIN, 
loading is terminated. If SYSLIN opened properly, the loader 
sets the "unlike attributes” indicator in the DCB to signify 
that SYSLIN may be a concatenation of data sets with unlike 
record formats. The buffers for the first input module are then 
allocated as described under "Buffer Allocation™ on page 14. 


INPUT CONTROL AND BUFFER ALLOCATION 


To read input, the loader determines whether the current input 
consists of object or load modules and whether it resides on an 
external device or in virtual storage. This is indicated by 
indicators (CMFLAG3) in the communication area as well as the 
record format of the DCB. (The format is undefined (CU) for load 
modules, fixed (F) for either object modules on an external 
device or internal object modules, and variable (V) for internal 
object modules.) If the input data set resides on an external 
device, buffers are allocated and primed. If the input data set 
1s an internal data area consisting of internal object modules, 
no allocation or priming of buffers occurs and the data area 
itself is considered one buffer. In any case, the records are 
read and processed until the end of the current data set is 
recognized, either through the end-of-concatenation or 
end-of-file condition for a data set residing on an external 
device, or through the end-of-buffer condition for an internal 
data area.’ (No check for the END card or EOM indication is 
made during the reading procedure; the end condition is only 
recognized when the record is processed.) When the end of the 
current input 18S reached, the loader checks for additional 
SYSLIN input. ® 


7 End-of-buffer signifies both end-of-file and 


end-of-concatenation for an internal data area. 

The end-of-concatenation switch is set during the data set 
opening if another data set 15 concatenated to the current 
one. If there is no other SYSLIN input, the 
end-of-concatenation and end-of-file switches are both set 
on. They are tested at the end of each module. 
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Another data set in SYSLIN is indicated unless both the 
end-of-file and end-of-concatenation switches are on. When the 
loader opens a new data set in SYSLIN input, the loader 
determines the new attributes. This is accomplished by the same 
ee atat used during loader initialization for the first input 
ata set. 


BUFFER MANAGEMENT (HENBUFFR ) 


Buffer Deallocation 


Buffer Allocation 


In general, the loader allocates storage individually for DECBs 
and buffers. Thus, for a single data set, buffer allocation 
actually consists of several separate allocations. These 
allocations are made from contiguous storage whenever feasible. 
All allocations are made from the highest available address in 
loader processing storage. When no longer needed, allocated 
space 1s made available for subsequent modules. 


If both the current input and the previous input consist of load 
modules, the loader uses the same buffer and DECBs. This is 
possible because the buffer-DECB requirement for load modules is 
constant. Figure 6 on page 15 illustrates the buffer and DECBs 
required for reading load modules. If either the current or the 
previous data set consists of object modules, the loader frees 
(deallocates) the storage used for the previous buffer-DECB 
allocation. 


A pointer to the first freed area is maintained at CMFRECOR. 
(See Figure 7 on page 16.) The first 4 bytes of each freed area 
are used to store a pointer to the next freed area in the chain. 
The second 4& bytes give the size of the current area. (The size 
is always rounded to doubleword value.) See Figure 7 for an 
tllustration of freed area chaining. 


Before chaining an area deallocated from a DECB or a buffer, the 
loader checks the area's location against the pointers of the 
other areas in the chain for contiguity. Contiguous freed areas 
are combined under a single pointer. For example, in Figure 7; 
Freed Area 1 could consist of areas from three separate 
deallocations: one of each DECB and one for the buffer. 


After freeing any previously used buffers, the loader allocates 
DECBs and buffers for the current input module. For object 
module input, a DECB is allocated and cleared, and the address 
of the DCB is stored in it; then, the related buffer is 
allocated and its address stored in the DECB. (The size of the 
buffer 1s obtained from DECBBLKSI; the number, from DCBNCP, 
where the value from DCBBUFNO was stored.) The allocation 
procedure is repeated until the specified number of buffers has 
been allocated. However, after the first time, each DECB is 
chained to the one before. The last DECB is chained to the 
first. (See Figure 8 on page 17 for an illustration of an 
allocation for object module input.) The loader also sets a 
pointer to the DECB chain in the communication area at CMRDECPT, 
sets the I/0 flags to indicate object module input, and saves 
the buffer size in the communication area for later 
deallocation. 


For load module input, the loader allocates the required two 
DECBs, clears them, chains them together, and stores the address 
of the DCB in them. The required buffer, called the RLD buffer, 
15 then allocated and its address stored in the first DECB. The 
loader stores a pointer to this buffer in the communication area 
at CMGETREC, and a pointer to the first DECB in CMRDECPT. (No 
buffer is allocated for load module text). The loader reads 
load module text directly into the loaded program's storage 
area. The RLD buffer size 1s stored in the DECB, and finally 
the I/0 flags are set to indicate load module input. 
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Control and RLD 
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Input DCB 
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~— —- DECDCBAD 


DECDECPT 












Note: CMRDCBPT, CMRDECPT, and CMGETREC are 
pointers in the communications area (HEWLDCOM). 


Figure 6. Load Module Storage Allocation for Buffer and DECBs 


In allocating buffers and DECBs for load or object module input, 
the loader attempts to reuse any storage freed from previous 
allocations. The loader examines each entry in the freed area 
chain to determine whether the related storage is sufficient for 
the current DECB or buffer. 


If the area is too small, the next entry is tested. If the size 
of an area equals the required size Crounded to doubleword 
value), the loader unchains the area and constructs the buffer 
or the DECB. If the size of the freed area is greater than that 
of the required area, the chain pointer for that area is updated 
to show the size and location of the remainder. 


If no area in the chain is adequate for the current buffer or 
DECB, the loader makes the allocation from its processing 
storage not previously allocated (prime storage). If this 
allocation requires an area so large that it would exhaust the 
table and buffer area, the loading process is terminated, with a 
message printed to indicate that available storage was exceeded. 


READING OBJECT MODULE INPUT FROM AN EXTERNAL DEVICE 


Because of the fixed format of object module records, the loader 
can initiate the reading of physical sequential blocks before 
they are actually needed for processing. To accomplish this, 
the loader primes the buffers after allocating them for object 
modules. Priming consists of initiating READ macro instructions 
for all buffers except one. When the loader requires the first 
record for processing, a READ macro instruction is issued for 
the unfilled buffer and a CHECK macro instruction is issued for 
the first buffer primed. 


At the beginning of processing for a module, the DECB pointer 
(CMRDECPT) specifies the DECB associated with the first primed 
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Loader Processing Storage ) 


Figure 7. Freed Areas from Buffer-DECB Allocation 





buffer (see Figure 8.) The pointer to the current logical 
record also specifies the beginning of that buffer. As each 
record 1s processed, the loader updates the logical record 
pointer to the next record. When all records in the buffer have 
been processed, the loader updates the DECB pointer to the one 
for the next filled buffer, and issues a READ macro instruction 
for the completed buffer. The procedure is repeated until the 
end of the module is recognized. 


READING INTERNAL OBJECT MODULE INPUT 


For internal object modules prepared by a compiler, record 
format may be fixed or variable. After initialization of the 
data area containing the internal object module records, the 
pointer to the current logical record points to the beginning of 
the data area. As each new logical record is requested, the 
loader updates the pointer to the next record in the data area, 
using the DCBRECFM field in the SYSLIN control block to 
determine whether fixed- or variable-length records are being 
processed. The end of the module is recognized when the length 
of the processed records equals the length specified in the 
DCBBLKSI field. At this time, the end-of-file and 
end-of-concatenation switches are set on. 


READING LOAD MODULE INPUT 


For load modules, the record format is undefined, but the order J 
in which record types may be processed is limited. For example, 
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Figure 8. Storage Allocation of Buffers and DECBs for Object Module Input 


control records are required before the related text record can 
be read. All nontext records of load modules are read into the 
same buffer. This buffer, the RLD buffer, has the same length 


as the maximum length of nontext records processed by the loader 
(256 bytes). 


The loader allocates a DECB for reading load module text, but no 
buffer, because the text is read directly into the loaded 
program's assigned area. The loader determines the address to 
receive the text during module processing. At the time a text 
record is read, the following record is also read, because that 
record is always nontext. 


PRIMARY INPUT PROCESSING 
After determining the current record type, the loader performs 
one of the following types of processing for the primary input 
(object and/or load modules from the SYSLIN data set): 
e External symbol dicttonary CESD) processing 


° Text record processing 
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Type of 
Processing Object Module Load Module 


No difference. No difference. 
No difference. No difference. 


MOD 
Cinternal 
object 
modules 
only) 


Input is an ESD record. 


° Relocation dictionary C(RLD) processing 

e Address constant relocation processing 

° End processing Cincluding end of module and END card) 
e MOD record processing 


If an invalid record type is encountered, a diagnostic message 
is issued. In addition, if an internal input data area is being 
processed, the end-of-concatenation and end-of-file switches are 
set on so that no further input will be processed. 


Figure 9 shows the differences in processing for object and load 
modules. Input module processing for object and load modules is 
shown in "Diagram Dl. Object Module Processing" on page 51 and 
"Diagram D2. Load Module Processing” on page 52 respectively. 


Input is a CESD record. 


The loader performs preliminary . The loader performs 
processing for NULL, PC, and LD preliminary processing for 
entries. SD, LR», PC, and NULL 


entries. 


The loader processes text from the After processing the entire 


object module buffer one ID at a ID/length list, the loader reads 
time. 


load module text directly into 
the loaded program's storage 
area. 


The loader processes the END state- The loader performs 


ment for each CSECT, and performs end-of-module processing. 


end-of-module processing. 


The loader determines the origin of Not processed. 
the compiler-loaded text for the 

module and equates this address 

with what would normally be the 

loader-assigned address. 





Figure 9. Object and Load Module Processing Differences 


Load module record types include composite ESD, control, RLD, 
control/RLD, text, SYM, IDR and scatter/translation. When the 
loader recognizes a SYM, IDR, or scatter/translation record, it 
simply ignores that record and requests another control record. 
Descriptions of those load module records processed by the 
loader follow. (For detailed descriptions, see the record 
formats given in the Appendix.) 


° CESD: Each of these records contains no more than 15 ESD 
entries.” The first 8 bytes give the following control 
information for the entries in that record: (1) the ESD ID 
of the first entry, (2) the number of bytes occupied by the 
entries, and (3) an indication of whether the CESD entries 
contain overlay segment numbers or AMODE and RMODE data. 


° Control: These records give control information about the 
module text on the following text record. Included are the 


2 The loader can accept a maximum of 1024 ESD entries per 
input module. 
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related ESD IDs and the lengths of each control section in 
the following text record, and an indication of EOM, when 
pertinent. The control records also contain a channel 
command word (CCW) with the linkage editor-assigned relative 
address and total length of the text record. The loader 
uses this information to read the text. 


e Text: These records contain the control sections with the 
instructions and data of the module. A text record can 
contain a maximum of 60 control sections. 


e RLD: These records contain the RLD entries used to relocate 
address constants in the preceding text. When the text 
contains a large number of relocatable symbols, the related 
RLD entries may require several records. 


® Control/RLD: These records combine a control and an RLD 
record into one physical block. They contain RLD entries 
related to a previous text record and the control 
information for the following text record. 


The object module records, ESD, RLD, TXT, and END, contain 
information similar to that described previously. In addition, 
an internal object module can contain the MOD record. This 
record contains control information about the text of the 
module, which has already been loaded by a compiler or other 
text-generating processor. This information includes the 
virtual storage address of the text, the address of the byte 
following the estimated or actual end of the text, and optional 
extent information. If a MOD record appears as the first record 
of an internal object module, all following text records are 
ignored until an END statement has been processed. 


EXTERNAL SYMBOL DICTIONARY (ESD) PROCESSING (HEWLESD) 


The loader processes the input modules’ external symbol 
dictionary (ESD) records to resolve the symbols used in internal 
and external addressing. Resolution ensures that each named 
location in the text for the loaded program has a unique 

symbol .!9 


To resolve symbols, the loader builds its composite ESD (CESD) 
from individual ESDs and CESDs in the input. The loader's CESD 
entries are created as required during processing of the input 
entries. See "Data Areas” on page 73 for a detailed description 
of CESD entries. 


Because of ESD processing, the loader's CESD contains only one 
entry for each uniquely named text location, regardless of the 
number of input ESD entries containing the symbol for that 
location.!! For a single module, the loader records multiple ESD 
entries for a symbol in the translation table.!2 Each entry in 
the translation table corresponds to one input ESD entry for a 
symbol and contains a pointer to the CESD entry for the symbol. 


A translation table entry has the same position in the table as 
the identifying number CESD ID) of the associated ESD entry. 
For example, if an input ESD entry has an ESD ID of three, its 
corresponding entry is the third one in the translation table. 
Using this relationship, the loader converts input ESD IDs via 
the translation table into the appropriate CESD address. 


10 Names for areas of private code or for external dummy 
section displacements need not be unique, because they are 
treated in a special way. These are defined by PC and PR 
entries, respectively. 

11 The only exception involves control sections with identical 
names. In this case, two entries, one of which is flagged 

2 "delete,”™ are kept in the CESD. 


The loader clears the translation table after processing 
each module. 
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The loader's ESD processing depends on the function of each 
input entry. The function of an entry is identified by the type 
indication in the entry. Figure 10 on page 20 gives the 
function specified by each type indication. The table also 
indicates whether a particular type can occur in object and/or 
load module external symbol dictionaries. 


When the loader creates a CESD entry, it chains it to others 
with the same type indication. Then, in processing each new 
input entry, the loader determines by searching the chains 
whether a CESD entry with the associated symbol already exists. 
(The loader only searches those chains for types that could be 
related to the current input entry's type.) In certain cases, 
special preliminary processing 1s performed to delay or to 
bypass the CESD search. 


CESD processing is shown in "Diagram D3. ESD Record Processing 


(Generalized)™ on page 53 through "Diagram Dé. Example of ESD ID 
Translation™ on page 56. 


ee 
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definition) beginning of a named 
Object & load 
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Object only 
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Figure 10 (Part 1 of 2). ESD Entry Types and Functions 















The delete 
indication means 

that the associated 
text and RLDs are to 
be deleted. 
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marked "delete”™ 1 


beginning of an 
unnamed CSECT not to 
be included in the 
loaded program. For 
example, a SEGTAB 
created by the 
linkage editor. 
































LD C€label 
definition) 


The defined label 
cannot be referenced 
directly because the 
LD entry has no ESD 
ID. The loader 
changes the type to 
LR in the CESD 
entry. 


Defines a label by 
giving its location 
relative to the 
beginning of the 
CSECT containing the 
label. 


















LR Clabel 
reference) 


An LR entry contains 
an ESD ID and can, 
therefore, be 
referenced by an RLD 
entry. 


Defines a label by 
giving its location 
relative to the 
beginning of the 
CSECT containing the 
label. 


















ER Cexternal 
reference) 


Refers to a symbol 
not defined in the 
same module 
containing the 
reference. 














Defines a common 
area whose virtual 
storage address is 
assigned during 
loading. 


CM Ccommon) The area may be 
named or unnamed. An 
unnamed area is 
called "blank 


common." 
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[ives ——~S~*di Fame on ———~S~*diecurrence [comments 


PR (pseudo Defines a Object & load The external DSECT 


register) displacement within defines the area 
Object & load 


an external dummy obtained by the 
Object & load 


section. loaded program via a 
Figure 10 (Part 2 of 2). ESD Entry Types and Functions 

































GETMAIN macro 
instruction. 






Indicates that the 
entry is to be 
ignored. 


Only one entry for 
NULL 18S made in the 
loader's CESD. 












WX Cweak external 
reference) 


Defines an external 
reference that is 

not to be resolved 
by automatic library 
call. 


The loader processes 
a WX entry as an ER 
entry with a "weak 
call” flag. 





Preliminary ESD Processing 


When the loader processes load modules, it does not necessarily 
receive CESD entries in the same order as the linkage editor 
assigned the relative addresses. Therefore, no entries for 
symbols that define module text locations are processed until 
all entries for the module have been received. 


The loader delays the processing by placing on a temporary chain 
the CESD entries it constructs for the SD, LR, and PC (Cnot 
marked "delete™) entries. Before chaining an entry, the loader 
places the ID and the segment number in the CESD entry. The 
entries are chained in the order of their linkage 
editor-assigned addresses. 


Besides the preliminary processing for load module location 
definitions, the loader also determines whether an input entry 
type is NULL, PC, LD, LR, or WX. These entries, in both object 
and load modules, are handled as follows: 


NULL 
The loader does not perform a CESD search for NULL entries, 
because these entries have no effect on ESD resolution. 
When the first NULL entry for a module is recognized, a 
CESD entry is created. This CESD entry is cleared and 
marked "delete." (See the CESD entry description in "Data 
Areas™ on page 73.) The loader places a pointer to the 
entry in the communication area (CMNULCHN) and makes a 
translation table entry. (See "Making a Translation Table 
Entry™ on page 27.) =For all following NULL entries, 
processing consists only of making a translation table 
entry that refers to the CESD entry pointed to by CMNULCHN. 


PC 
The loader does not perform a CESD search for PC entries, 
because it treats them as unique. For each PC entry, the 
loader creates a CESD entry. Processing continues as 
described under "No-Match Processing” for SD entries. 


PC “delete” 


The loader treats PC entries that are marked "delete" as 
NULLs. 


LD and LR 


LD and LR entries depend on their related section 
definitions (SDs). Therefore, before performing the CESD 
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CESD Searching 


search, the loader inserts the CESD entry address for the 
SD in the LD or LR entry. The address is obtained by 
translating the SD ID contained in the LD or LR. 


If an object module is the input, it is possible (through 
physical rearrangement of an object deck) to receive an LD 
before the related SD. The SD's CESD entry address cannot 
be placed in the LD until the SD's entry is created. 
Whenever this occurs, the LD is placed on a temporary LD 
chain. At the end of each input ESD record, the temporary 
LD chain is processed to determine whether a required SD 
has been received. When the SD associated with an LP has 
been received, its CESD entry address is placed into the 
LD. i loader then searches the CESD for a matching 
symbol. 


WX 

The loader treats WX entries as ER entries that are marked 
"weak call." The "weak-call" flag, like the "never-call"” 
flag, specifies those external references that are not to 
be resolved by automatic library call. However, the 
following difference arises in match processing: If a WX 
entry matches an ER entry in the CESD, the "weak-call" flag 
is set off. If an ER entry with a "never-call"™ flag 
matches an ER entry in the CESD, the flag is left on. 


In general, an input ESD entry requires resolution processing. 
The loader does this by searching the CESD for a matching 
symbol. To direct the search, the loader uses two tables. 
These are: 


e HIERTBLE, which specifies which CESD chains are to be 
searched for a particular entry type, and the order in which 
the chains are to be searched 


e CMTYPCHN, which contains the address of the first entry in 
each CESD chain 


Figure 11 on page 23 shows the relationship between the two 
tables. 


The loader determines the type of an input ESD entry and begins 
to search the first chain specified by HIERTBLE. (If the type 
is LD, the loader performs the search as if it were an LR.) The 
symbol from the input entry 1S compared to the symbol in each 
chained entry. If no matching symbol is found and end of chain 
is recognized, the next chain specified by HIERTBLE is 
searched.!* If no matching symbol is found in any of the 
appropriate chains, a CESD entry for the symbol is created and 
chained. A translation table entry is also made, if 
appropriate. (See "No-Match Processing" on page 23.) Ifa 
matching symbol is found, symbol resolution occurs. (See "Match 
Processing" on page 29.) 


13) Whenever a new entry on a chain is examined, a pointer to 
that entry is stored in the communication area (CMPREVPT). 
Should the next entry on the chain be a match, the pointer 
at CMPREVPT is used to update the chain. 
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HIERT BLE CMT YPCHN 


Input ESD 
Entry Type 


Order of Type Chain 
Search 








SD CM PR NULL 
Chain Chain Chain Chain 





Address Address | Address | Address 





Notes: 


The HIERTBLE entries identify by number the CMTYPCHN entries. 
For example, zero (0) in the HIERTBLE refers to the SD chain address in CMTYPCHN. 


When more than one type chain can be searched for a symbol, 

the order is specified by HIERTBLE. For example, if an input 

ESD entry is an SD, the HIERTBLE entry specifies that the ER, SD, CM, 
and LR chains are to be searched in that order. 





Figure 11. Tables Used in the CESD Search 





No-Match Processing 


When a symbol is received for the first time, the loader 
performs processing that depends on the type of the input entry 
for the symbol. This always includes the construction of the 
CESD entry, which differs by entry type. Except for LD entries, 
no-match processing also includes construction of a translation 
table entry. 


If the user specified the MAP option, the loader formats a map 
entry for each symbol Cexcept ERs). See Figure 46 on page 96 
for an example of map output. The loader prints the map entries 
on the SYSLOUT data set. 
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Figure 12 summarizes the processing performed for each input 
entry type. : 


Translation 
Table 





Figure 12. No-Match Processing Required for Input Entry Types 


Note to Figure l2: 
i Because CM and PR entries are assigned addresses during 
final processing, they are also mapped at that time. 


MAKING A CESD ENTRY: For each input entry type, the loader makes 

a CESD entry. A WX entry type is treated as an ER input entry 

type with a "weak-call™ flag. The loader first obtains the 

storage required for the entry (22 bytes). Whenever possible, 

the loader uses storage previously allocated for CESD entries 

that were later freed. CA CESD entry can be freed as a result 

of preliminary ESD or of resolution processing.) The loader . 
chains freed entries together. <A pointer to the chatn resides ; 
in the communication area at CMESDCHN; the pointer is updated as 

the freed entries are used. 


If there are no freed CESD entries, the loader allocates storage 
for the entry from the highest available processing storage. 
(See Figure 13 on page 25.) If the space required for the entry 
would exceed available storage, the loading process is 
terminated with an error message. The loader makes this 
determination by comparing the pointer for the beginning of the 
loader's tables (CMLOWTBL) to the overflow pointer that is the 
highest address used for the loaded program's text CCMLSTTXT). 
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CMHITBL 


a 


High Address 


Communications area 


(HEWLDCOM) 











Q 
de 


Save areas 








Input DCB 











Output DCB 








DECBs and buffers for output 











Initial DECBs and buffers for input 








Additional buffers and DECBs for input 





CMLOWTBL ——> os 


Direction of table and buffer allocations 


Direction of program growth 





Text already loaded for the current module 
<MMODENG (no ‘‘no-length” CSECTs) SMEOT TS) 














CMNXTTXT ——> 


Text already in storage for the program being loaded 




















CMBEGADR 


Return parameter list area 
Low Address 





CMMAINPT 


Notes: CMBEGADR =Beginning address of loaded program 
CMHITBL = End address of Loader processing storage below the line 
CMLOWTBL =Lowest address allocated for buffers and tables 
CMLSTTXT =Highest address already used for the loaded program's text 
CMMODLNG =Length of text already loaded for the current module. not including ‘‘no-length’’ CSECTs 
CMNXTTXT =Lowest address used for the current module 
CMMAINPT = Beginning address of loaded program space 


Figure 13. Storage Allocation 





Method of Operation 25 


This document contains restricted materials of IBM. © Copyright IBM Corp. 1972,1983 
LY26-3922-0 


26 


After obtaining storage for the CESD entry, the loader stores 
descriptive information in the entry. The information stored 


types 15 described below: 


depends on the input entry type. Handling of the various entry ) 


SD 


The loader moves the symbol from the input entry to the 
CESD entry. 


The loader then assigns an address to the defined CSECT by 
adding the length of all previously defined CSECTs for this 
module to the loader-assigned address of the first CSECT in 
the module. CIn the communication area, the length of all 
previously defined CSECTs is found at location CMMODLNG; 
the loader-assi.gned address of the first CSECT, if the 
CSECTs are being passed through text records, is found at 
CMNXTTXT; and the loader-assigned address of the first 
CSECT, if the CSECTs are being pointed to by MOD records, 
is found at location CMCORE1.) For CSECTs pointed to by 
MOD records, the resulting address is stored in the CESD 
entry for the SD as the loader-assigned address of the 
CSECT. For CSECTsS passed through text records, however, 
the resulting address is compared to the overflow 
Ppointer—the beginning address of the loader tables 
(CMLOWTBL?. If there is no more unused storage, the 
loading process 1s terminated with an error message. 
Otherwise, the resulting address is stored in the CESD 
entry for the SD as the loader~-assigned address of the 
CSECT. 


Next, the loader clears the CESD flag field, except for the 
entry's type indication, and computes the relocation 
constant. The relocation constant is computed by 
subtracting the input address (specified by the input SD 
entry) from the loader-assigned address. The loader stores 
the relocation constant in the CESD entry. 


If the option to specify the entry point name for the ) 
loaded program was used, the loader determines whether the | 
SD with that name has already been received. If not, the 

loader compares that name to the symbol for the currently 
defined CSECT Cthe symbol in the CESD entry). If the names 

are the same, the loader-assigned address is stored as the 

entry point address in CMEPADDR. 


For an SD entry, the loader determines whether the CSECT 
length specified in the input entry equals 0. If so, the 
loader sets the "no length" indicators in the communication 
area and in the CESD entry itself. If the length is 
positive, it 1s added to CMMODLNG to calculate the next 
CSECT address. If the MAP indicator is on, the MAP entry 
1s made for the SD. 


Finally, the loader puts the CESD entry on the SD chain 
pointed to in the CMTYPCHN table. Chaining consists of 
storing the pointer to the last SD entry (found in 
CMTYPCHN) in the current CESD entry's chain pointer. Then 
the address of this entry becomes the current pointer in 
CMTYPCHN. After chaining the entry, a translation table 
entry 15 made. 


LD or LR 


MVS/370 Loader Logic 


The loader processes input LD entries in the same manner as 
input LR entries. The name from the input entry is moved 
to the CESD entry. Then the loader-assigned address for 
the defined label is determined by adding the relocation 
constant (found in the CESD entry for the related SD) to 
the input address of the LD or LR entry. If the 
instructions and data for the module have been passed 
through text records and if the loader-assigned address 
exceeds available storage, the loading process is 
terminated with an error message. Otherwise, the address 
is stored in the CESD entry. 
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The loader sets the type indication in the CESD entry to 
LR. Finally, the relocation constant is computed. This 
value equals the loader-assigned address minus the input 
relative address. The relocation constant also is stored 
in the CESD. If the related SD entry was marked "delete," 
the loader makes an ER entry instead of an LR and sets the 
"delink™ flag in the entry to signify that all adcons 
referring to it should be adjusted. 


CM 
To make a CM entry, the loader uses two separately obtained 
20-byte areas. The first area obtained is used as an 
extension to the CM entry. In this portion, the loader 
stores the length and the address assigned to the common 
area in the input. Then the loader obtains the second 
20-byte area and stores in it the name for the common area 
and the entry's type indication. (This area is the one 
pointed to by the translation table and the CM chain.) The 
loader clears 3 bytes in the entry to be used as a pointer 
to related ERs and sets a pointer in it to the extended 
portion of the CM entry. Finally, a translation table 
entry is made. 


PR 
For a PR entry, the loader moves the information describing 
the external DSECT from the input entry to the CESD entry. 
The 3-byte field to be used as a pointer to the related 
RLDs is cleared, and the entry is chained to the other PR 
entries. (PRs are chained according to their order in the 
input.) For a DSECT displacement definition, a translation 
table entry 1s also required. 


ER 
For an ER entry, the loader moves the name and type from 
the input entry to the CESD entry. If the input ER entry 
is marked "never call,” the loader sets the "never-call"™ 
indication in the CESD entry. If the input ER entry is 
marked "weak call,™ the loader similarly sets the 
"weak-call™ indication. The loader then chains the ER 
entry to the other ERs and makes a translation table entry. 


MAKING A TRANSLATION TABLE ENTRY: The loader uses the 
translation control table to direct building of the translation 
table.!* The translation control table consists of 32 fullword 
entries beginning at location CMTRCTRL in the communication 
area. Each entry 1s a pointer to a possible 32-entry extent to 
be allocated for the translation table. The loader allocates 
—— extents as required, depending on the number of incoming ESD 
entries. 


The entries of one extent correspond to consecutive ESD IDs ina 
single module. For example, the entries of the first extent 
correspond to ESD IDs from 1 to 31; those of the second extent 
correspond to IDs 32 to 63; and so forth. (Because the initial 
4 bytes are used for indexing purposes, the first extent 
contains only 31 translation table entries.) Thus, the position 
designated for creation of a particular translation table entry 
depends on the ESD ID of the associated input entry. 


Figure 14 shows an illustration of the translation control table 
and the translation table. 


To make a translation table entry, the loader first determines 
whether the input ID is valid. ("Diagram D6. Example of ESD ID 
Translation™ on page 56, reference (A).) If an ID is not valid, 
an error message 15 printed and loading continues with the next 
input ESD entry. An ID is not valid if it is less than 1 or 
greater than 1023. 


14 For each input module, the loader reinitializes the 


translation table. 
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CMTRCTRL 


ALL 


TRANSLATION CONTROL TABLE 


3] 


Extent *# 1 


32 


33 


34 


35 


63 


Extent # 2 


TRANSLATION 
TABLE EXTENTS 


Figure 14. Translation Control Table and Translation Table 





If an ID is valid, the loader then determines, by examining the 
translation control table, whether the extent for this ID has 
been allocated. If not, the loader allocates an area for 
thirty-two 4&-byte entries and stores the beginning address of 


the area in the translation control table entry for this extent. 


The area is allocated from the highest available storage in the 
loader's table and buffer space. If not enough loader 
processing storage remains to make the allocation, loading is 
terminated with an error message. 


After the extent allocation has occurred, the loader clears the 
extent. The loader then calculates the entry address in the 
extent for this ID. The address of the CESD entry related to 
the input entry ID is stored in the translation table entry. 


If the CESD entry is an ER, the loader sets the high-order bit 
of the first byte of the translation table entry to 1. (CThis 
indicates absolute relocation. ) 


Figure 15 on page 29 shows the overall relationship of tables 
used in ESD processing. 
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Translation Control Table 
(CMTRCTRL) 






CESD Control Table 


(CMTYPCHN) 
SD LD ER LR PC CM PR NULL 
chain | chain=0| chain | chain=0|chain=0|chain=0| chain | chain =0 
CESD entry for last CESD entry for last 


SD received unresolved ER received 


- | iso) 





CESD entry for last 
PR received 





RLD entr 







Extent | 





RLD entry 


Extent 2 


CESD entry for first 
PR received 


Three Extents of the 
Translation Table 


RLD entry 





RLD entry 


Figure 15. Overall Relationship of Tables 


Match Processing 


If the loader finds a match for an input symbol during the CESD 
search, the loader performs symbol resolution. Through 
resolution, the loader ensures that each named location within 
the text of the loaded program has a unique symbol.?5 Also, all 
references to a named location are set to the correct 
loader-assigned virtual storage address. 


If two named locations have the same symbol, only one of them 
can be retained for the loaded program. The loader determines 
which is retained on the basis of ESD entry type. The general 
rules used in symbol resolution follow. 


If the entry already in the CESD has type: 
SD, it is always retained. 
LR, 1t is always retained. 


CM, it is retained, except when the input type is SD. 
ER, it 18s always changed to the input type. 


15° This does not refer to PC AND PR names, which need not be 
unique, 
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If two entries have matching symbols and have types that 


indicate they should be retained, 
entry received. 


Figure 16 gives a summary of symbol resolution. 









nput Type 
SD 






SD 


ER 
SD SD 
CM 
LR 





Figure 16. Symbol Resolution 


Notes to Figure 16: 


1 


2 


Match results in an error. 


Match results in an error if the SD for the LD/LR is not 
marked "delete." 


INPUT ENTRY TYPE IS SD: 


CESD 


CESD 


MVS/370 Loader Logic 


type is ER 

The loader changes the ER entry in the CESD to an SD entry. 
The entry is made as described under "No-Match Processing” 
for an SD entry. This includes: chaining the entry to 
other SDs, updating the cumulative length of the loaded 
program, determining whether this is the loaded program's 
entry point name, mapping the entry, and making a 
translation table entry. If RLDs were chained to the ER 
entry, they are relocated as described under "Relocation 
Processing.” Also, the loader takes the entry off the ER 
chain, using the pointer to the previous entry on the chain 
CCMPREVPT). If there are no previous entries, the loader 
sets the ER entry in the type chain table CCMTYPCHN) to Q. 


type is SD 

If the original SD is not flagged "delete,”™ the loader 
obtains space for another CESD entry and moves the name and 
loader-assigned address of the original entry into the new 
one. The relocation constant is then computed by 
subtracting the input address from the loader-assigned 
address. A “delete” indicator is set to show that text and 
RLDs related to the current input SD should be deleted. If 
the text for the CSECT has been pointed to by a MOD record 
rather than having been passed through text records, the 
text cannot be deleted and, thus, the cumulative module 
length CCMMODLNG) is updated to include this CSECT. 
Finally, the entry is chained to existing SD entries and a 
translation table entry is made. If the original SD 1s 
flagged "delete," the original entry is used. 


the loader retains the first } 


J 


J 
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CESD 


type is CM 

The loader changes the existing CM entry to an SD. Because 
the extended portion of the CM entry is no longer needed, 
the loader chains it to the freed CESD entries (pointed to 
by CMESDCHN). First, however, the loader obtains the 
length of the common area from the extended portion. For 
the SD entry, the loader retains the greater between this 
length and the one specified in the input SD. To change 
the CM entry to an SD, the loader performs the same 
processing described above for the SD-ER match. 


type is LR 

The loader sets the “delete” indicator in the CESD entry so 
the text associated with the input SD will not be loaded. 
The relocation constant is updated to reflect the 
difference between the relative address in the input entry 
and the loader-assigned address in the CESD entry. The 
loader makes a translation table entry referring to the 
existing LR entry in the CESD. 


INPUT ENTRY TYPE IS CM: 


CESD 


CESD 


CESD 


CESD 


type is CM 

The loader determines the greater of the length in the 
extended portion of the CESD entry and the length specified 
in the input CM. This greater length is retained in the 
CESD entry. The loader stores the new input address in the 
extended portion of the CM entry. A translation table 
entry is also made. 


type is ER 

To change an ER entry to a CM, the loader obtains a 22-byte 
area for the extended portion and chains it to the existing 
entry. The loader stores the type, address, and length 
from the input entry in the extended portion of the CESD 
entry. The CM type indication is set, and the entry is 
unchained from the ERs. The loader chains the entry to the 
other CMs and makes a translation table entry. 


type is SD 

The relocation factor in the CESD entry is updated to 
reflect the CM relative address, and a translation table 
entry is made. 


type is LR 

The loader issues an error message for matching symbols 
With conflicting types. Nevertheless, the relocation 
constant is updated and a translation table entry is made. 


INPUT ENTRY TYPE IS LD OR LR: With one exception, LD and LR 
entries are processed in the same way. The difference is that, 
because an LD entry has no ESD ID, the loader does not make a 
translation table entry for an LD. 


CESD 


CESD 


type is ER 

The loader changes the ER entry to an LR. The loader 
assigns a virtual storage address for the symbol by adding 
the relocation constant from the related SD entry to the 
relative address in the input LR. Next, the loader 
calculates the relocation constant by subtracting the input 
address from the loader-assigned address. Both the 
relocation constant and the loader-assigned address are 
stored in the LR entry in the CESD. Any RLDs that were 
chained to the ER entry are relocated. The loader checks 
the LR name for the user-specified entry point and makes a 
MAP entry if mapping is required. Then, the loader takes 
the CESD entry off the ER chain and chains it to the LR 
chain. If the input entry was an LD, no translation table 
entry 18S made. Otherwise, the loader makes a translation 
table entry. 


type is LR 


If the SD entry pointed to by the LR is not marked 
“delete,” the loader issues an error message for matching 
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CESD 


CESD 


symbols with conflicting types. In any case, the loader 
updates the relocation constant in the existing CESD entry. 
The loader makes a translation table entry referring to the 
LR in the CESD if the input entry was an LR from a load 
module. If not, a translation table entry is required. 


type is SD 
Processing is the same as that described above for an 
LD/LR-LR match. 


type is CM 

The loader saves the input address in the extended portion 
of the CM entry. The loader makes a translation table 
entry only if the input entry was an LR from a load module. 
If the SD pointed to by the LR entry is not marked 
“delete,” the loader issues an error message for matching 
symbols with conflicting types. 


INPUT ENTRY TYPE IS ER: Whenever the loader makes a translation 
table entry for an input ER, it sets an indicator for later use. 


(The 


indicator signifies during RLD processing that the 


loader-assigned address is to be used for relocation of any RLDs 


with 
CESD 


CESD 


CESD 


CESD 


this ID.) 


type is SD 
The loader makes a translation table entry referring to the 
SD entry. 


type is ER 

If the input ER is marked "never call,™ the loader also 
sets the "never-call™ indicator in the CESD entry. If the 
"delink™ indicator is on, the loader sets the indicator 
off. In any case, a translation table entry is made 
referring to the ER entry in the CESD. If either ER is 
marked "weak call,™ the "weak-call™ flag is set off. If 
both ERs are marked "weak call,” the flag is left on. 


type is LR J 
T to the 


he loader makes a translation table entry referring 
LR entry. 


type is CM 

The loader sets the input address in the extended portion 
of the CM entry to zero, and makes a translation table 
entry referring to the CM entry. 


INPUT ENTRY TYPE IS PR: A PR entry can only be matched to 
another PR entry. When two of these definitions of external 
DSECT displacements have matching symbols, the loader sets the 
existing CESD entry to specify the greater of the two given 
displacement lengths. The loader also determines the most 
restrictive boundary alignment specified in the two PR entries. 


(For 


example, doubleword alignment is more restrictive than 


fullword.) The PR entry in the CESD is changed, if necessary, 
to specify this alignment. 


TEXT RECORD PROCESSING 
Text 


record processing consists of loading those CSECTs required 


for the loaded program into their assigned locations. The 
loader determines whether a CSECT is to be retained or deleted 
by examining the CESD entry for that CSECT's ID. The 
translation table is used to obtain the CESD entry. 


The way the loader processes text records depends on whether the 
current input is an object or a load module. If the input is an 
object module, the loader reads all the records for the module, 
including text, into virtual-storage buffer areas and then 
processes each record in turn. For load modules, the loader 


uses 
text 
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Processing Object Module Text (HENLTXT) 


When a text record is recognized during processing of an object 
module, the ID contained in the record is translated into a CESD 
entry address. The loader translates the ID by first ensuring 
that the ID is valid and then using the translation control 
table to obtain the corresponding translation table entry. 


The translation procedure is the same as used prior to 
allocating a translation table extent. (See "Making a 
Translation Table Entry.™) 


In processing text, the loader considers an ID invalid if no 
translation table entry exists for it. Thus, an ID between the 
allowable limits of 1 and 1023 is invalid if it was not received 
during ESD processing. For any invalid ID, the loader issues an 
error message and then tries to process the next record. 

(Object module text processing is shown in "Diagram D7. Object 
Module Text Processing” on page 5/7.) 


CA) If a translation table entry does exist for an ID, the 
entry contains the address of the CESD entry for the related 
text. The loader determines whether the CESD entry is marked 
"delete.” If it is, the loader skips the text record and tries 
to process the next record. 


(B) If the CESD entry is not marked “delete,” the loader sets 
an indicator to show that some text has been received for this 
module. If the "no length” indicator in the CESD entry has been 
set on, an indicator is set in the communication area to show 
that text has been received for a "no length" CSECT. The loader 
then calculates the address for this text in the loaded 
program's virtual-storage area. The address equals the 
displacement of the text from the beginning of the input added 
to the relocation constant contained in the CESD entry. 


(C) Next, the loader checks whether the text would exceed 
available storage by adding the length of the text to the 
assigned virtual-storage address. The resulting end address for 
the text is compared to the overflow pointer—the beginning 
address of the loader tables (CMLOWTBL). If the text would 
overlap, loading is abnormally terminated. 


If there is sufficient unused storage for the text, the loader 
moves the text from the buffer area to the assigned address in 
the loaded program's area. Finally, the loader updates the 
pointer to the highest address used for the loaded program's 
text CCMLSTTXT). 


Processing Preloaded Text (HENLMOD) 


If a SYSLIN data area consisting of internal object modules is 
passed to the loader, one MOD record may be substituted for all 
text records within a module. Upon encountering a MOD record, 
the loader checks that an internal object module is being 
processed, that no ESD records have been received for the 
module, and that some control information is contained in the 
MOD record. If any of these conditions is not met, the record 
is ignored. Otherwise, indicators are set to show that a MOD 
record and text have been received for the module. If the 
origin of the first CSECT is specified, it is saved in the 
communication area at location CMCORE1L. Similarly, the address 
of the byte following the estimated or actual end of the text is 
saved at location CMCORE2. 


Extent information, used by the identification routine 
CHEWLIDEN), is saved in chained entries pointed to by location 
CMXLCHN in the communication area. These entries contain the 
address and length of the extent anda pointer to the next entry 
in the chain. The number of extents is saved at location 
CMNUMXS in the communication area. Later, the identification 
routine uses these entries to build a parameter list for the 
IDENTIFY macro instruction. 
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Finally, the address of the first extent is saved as the default 
entry point of the program if the entry point has not previously : 
been defined. } 


Processing Load Module Text (LMTXT) 


The loader uses the text control (Cor control/RLD) record to 
process load module text. The control record contains an 
ID/length list with an entry for each CSECT in the following 
text record. By processing the IDs consecutively, the loader 
determines which CSECTs from the record are to be retained as 
part of the loaded program. 


Load module text processing is shown in "Diagram D8. Load Module 
Text Processing” on page 58. 


PROCESSING THE ID/LENGTH LIST: The loader obtains each ID in 
turn from the list and attempts to translate each one, via the 
translation control and translation tables, to a CESD entry 
address. If the loader determines during translation that an ID 
is invalid, the loader skips over the record. If there are more 
Sea in the module, the loader continues processing the 
module. 


If the translation of the ID is successful, the loader checks 
for the "delete™ flag in the CESD entry Cobtained by the 
translation). If the entry is marked "dalete," the loader adds 
the length from the ID/length list entry to the sum of the 
lengths of any immediately preceding CSECTs to be deleted. 


The accumulated sum is used to truncate the text record when 
CSECTs at the end of the record are to be deleted. Therefore, 
only the sum of those consecutive CSECTs to be deleted at the 

end of the record is used. To accomplish this, the loader 
reinitializes the sum of these lengths to zero whenever a 
following CSECT is to be retained. (CSECTs to be deleted can be 
scattered throughout a text record.) 


If the CESD entry for a text ID is not marked "delete,™ the 
loader determines Whether the current CSECT is the first one to 
be retained from the text record. If it is, the loader saves 
the relative relocation constant from the related CESD entry. 
CAfter completely processing the ID/length list, the loader uses 
this relocation constant to calculate the proper main storage 
address for reading the text record.) After saving the 
relocation constant, the loader sets an indicator to show that 
at least one CSECT from this record is to be retained and that 
its relocation constant has been saved. COnly one relocation 
constant per control record is used, because the text record is 
read in as a whole.) 


Each time the loader recognizes a CSECT to be retained, it 
updates the pointer to the last address used for text (CMLSTTXT) 
by adding the length of the CSECT to the previous value of 
CMLSTTXT. 


READING THE TEXT: After processing all IDs in the ID/length 
list, the loader prepares to read the text into 
storage—directly into the load program's storage area. The 
loader: 


) Adds the relocation constant and beginning delete length to # 
the CCW address from the text control record to obtain the 
loader-assigned address of the text. (See Figure 17 on page 
35.) 


° Subtracts the sum of the lengths of consecutive deleted 


CSECTs at the end of the text record from the text length in 
the control record to obtain the actual read count. 


J 
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Note: 
CSECT A' and CSECT B' are to be deleted, 
The text read address is, therefore, the Loader-assigned address of CSECT C. 
During later text processing, the Loader moves CSECT C to its proper location 
over CSECT A' and CSECT B'. 


Figure 17. Loading the Text from a Load Module Record 








CSECT CSECT CSECT 
A B' C 


Input Text Record 


° Adds the read count to the loader-assigned address to 
determine whether sufficient unused storage remains for the 
text. If not, an error message is issued and loading is 


terminated. 


e Determines Whether the text record is the last record in the 
module by examining the control record's type. 


If the record is not the last, the loader determines whether any 
CSECTs from the record are to be deleted. If not, the text 
record and the following control record are read. (The control 


record 18 read into the RLD buffer.) 


If the text record is the last in the module or if any CSECTs 


from the record are to be deleted, 


the loader reads in only the 


text record. If an end-of-file occurs, the loader terminates 
module-text processing and issues an error message; then the 
loader goes to end-of-module processing. 


CHECKING CSECT STORAGE ADDRESSES: 


If CSECTs to be deleted were 


scattered among the CSECTs to be retained, the loader deletes 
these scattered CSECTs after the text has been read into 


storage. 


The loader ensures that each CSECT is in the location determined 


durtng ESD processing. To do this, 


the loader again translates 


each ID in the ID/length list to obtain the related CESD entry. 


If a CESD entry for an ID is marked “delete,™ the loader 
continues translating successive IDs until one is not marked 
"delete.™ The loader determines whether the related CSECT is in 
the correct place by comparing its current address to the 
loader-assigned address found in the CESD entry. If the text is 
correctly placed, the loader continues to translate IDs. 
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If a CSECT is in the wrong place, the CSECT is moved to the 
loader-assigned address. Before checking the next ID in the 
ID/length list, the address of the current CSECT is updated by 
the length of the current CSECT to get the current address of 
the next CSECT. When all CSECTs are in the correct location, 
the loader continues processing the module with the next record. 


Next, the loader determines whether a control record was read at 
the same time as the text record. If so, the loader continues 
processing the module with that control record. Otherwise, the 
end of the module has been reached, and the loader goes to 
end-of-module processing. 


RELOCATION DICTIONARY (RLD) PROCESSING CHEWLRLD) 


Processing of relocation dictionary records consists of building 
the loader's RLD table from information in the input RLD 
records. RLD record processing is the same for object and load 
module input. (Relocation of adcons is performed as the RLD is 
encountered unless the referenced CSECT is not in virtual 
storage. ) 


RLD record processing is shown in "Diagram D9. RLD Record 
Processing" on page 59. 


To build the RLD table, the loader tests the R and P pointers of 
the entries in an RLD record for validity.!® These pointers 
consist of ESD IDs describing an address constant. The P 
pointer gives the ESD ID of the control section containing the 
address constant; the R pointer gives the ESD ID of the symbol 
referred to by the address constant. 


Because the pointers are IDs, they are valid if translation 
yields the address for the ID to a CESD entry. If an invalid ID 
is received, the loader issues an error message and continues 
RLD record processing with the next entry having different R and 
P pointers. 


The loader first translates the P pointer. If the CESD entry 
for that ID is marked "delete,” the loader skips all RLD entries 
with the same R and P pointers. If the CESD entry is not marked 
"delete." the loader checks the validity of the R pointer, 
unless the RLD entry is for a cumulative pseudo register (CXD 
type). 


CA) After ensuring that the RLD pointers are valid, the loader 
makes an RLD table entry for the input entry. (The loader uses 
the storage from a freed RLD entry if possible. Otherwise, 
storage for the entry is obtained from the highest available 
storage. ) 


The loader stores, in the RLD table entry, the loader-assigned 
address of the address constant. The address is obtained by 
adding the relocation constant from the CESD entry identified by 
the P pointer, to the value found in the address field of the 
input RLD entry. CIf the RLD is for a cumulative external DSECT 
displacement, it is chained from location CMCXDPT in the loader 
communication area; the next RLD entry is then processed.) The 
loader moves the flag field from the input entry to the RLD 
table. If the translation table entry indicates that an ER 
entry is referred to by the R pointer, the loader sets an 
indicator in the RLD table for absolute relocation. 


16 RLD entries for adcons referring to a cumulative pseudo 


register are only tested for a valid P pointer, because the 
R pointer 1s always zero (CXD-type RLD). 
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After completing the RLD table entry, the loader determines 
whether relocation is possible by determining the type of the 
CESD entry. Processing for the CESD entry types 15 as follows: 


SD, PC, LR 
The loader clears the chain field of the RLD table entry 
and relocates the address constant. (See "Relocating 
Address Constants."™) 


CM, ER created from LR 
The loader delinks the RLD entry. That is, it subtracts 
the input address of the CM or ER from the value in the 
address constant. The RLD entry is then chained to the CM 
or ER entry for later relocation after the loader-assigned 
address is defined. 


PR, ER 
The RLD table entry is chained to the related CESD entry 
when the address for the CESD symbol is assigned. (See 
"Match Processing.™) 


CB) After processing an RLD entry, the loader continues 
processing the entries in the RLD record until the end of the 
record is reached. If the R and P pointers for the next entry 
are the same as for the current entry, the loader does not 
recheck them. for validity. Instead, the RLD table entry is made 
directly. If the pointers for the next entry are different, the 
loader performs the validity check. 


RELOCATING ADDRESS CONSTANTS (CHEWLERTN) 


Address constant relocation is the replacement of an address 
constant in the text of the loaded program with the actual 
virtual~storage address. Whenever possible, the loader 
relocates adcons as it encounters their RLD entries. 


The loader processes three types of relocatable address 
constants: 


e A-type constants, used to reference a location in the same 
CSECT as the constant 


e V-type constants, used to reference a location ina 
different CSECT 


e Q-type constants, used to reference a displacement in an 
external dummy section 


In general, the virtual storage address equivalent of an address 
constant is calculated by combining either the relative or the 
absolute relocation constant with the input value of the address 
constant.!’ The relative relocation constant is the difference 
between the loader-assigned address and the input address of the 
referenced location. The absolute relocation constant is simply 
the loader-assigned virtual-storage address of the referenced 
location. Figure 18 on page 38 relates the types of relocation 
constants and of address constants to the types of relocation. 


17° The loader does not compute the absolute addresses for PRs 


or CMs until all the text has been loaded. 
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Type of. 
Relocation 


Absolute 
Relocation 


Relative 
Relocation 


Relative 
Relocation 


Pseudo 
Register 
Relocation 


Delinking 





1972,1983 


— 7 


Displacements are not valid 
in V-type address constants. 


Relocation Constant Type of Address 

Usage Constant 
Absolute relocation 
constant replaces 
adcon value 


VCsymbol) where 
symbol is not a 
PR in CESD 


Relative relocation 
constant 1s added 
to or subtracted 
from adcon value 


Addition or subtraction is 
specified by indicators in 
RLD flag field. Also see 
comment below for Delinking. 


ACsymbol) where 
symbol is not an 
ER or PR in CESD 


Addition or subtraction is 
specified by indicators in 
RLD flag field. 


ACsymbol) where 
symbol is ER in 
CESD 


Absolute relocation 
constant 1s added 
to or subtracted 
from adcon value 


Pseudo register 
displacement 
constant 15 moved 
in 


Input address of CM 
or LR/LD CESD entry 
1s subtracted from 


QCsymbol) where 
symbol is PR in 
CESD 


ACsymbcl) where 
symbol is CM or 
ER created from 


The relocation of address 


constants pointing to CM 


CESD entries is a 





value LR/LD combination of (1) delinking 
and subsequent (2) relative 
relocation with the absolute 


ralocation constant. 


Figure 18. Relocation of Address Constants 


Note to Figure 18: 


loader-assigned address 


Absolute relocation constant = 
= loader-assigned address minus the 


Relative relocation constant 
Input address 


wel 


When the loader resolves a CESD entry (for example, a CESD ER 
matched with an SD), it relocates all address constants 
referring to the name. These are pointed to by RLD table 
entries chained from the CESD entry. The loader processes each 
RLD entry in the following way. 


First, the loader ensures that the address constant is not an 
invalid 2-byte adcon. (TWo-byte adcons can only be used to 
define external DSECT displacements.) If the adcon is invalid, 
the loader issues an error message and continues loading the 


program. Otherwise, the loader moves the adcon from the text to 
a work area, where it determines the type of relocation 
required. 


If the RLD entry indicates absolute relocation, the loader 
places the absolute relocation constant at the text address. 
The RLD entry is placed on the chain of freed RLD table entries 
CCMRLDCHN), and the next entry on the chain 1s processed. When 
the end of the RLD chain has been reached, the loader continues 
its processing. 


If the RLD entry indicates relative relocation, the loader also 
determines the type of relocation constant required. If the 
location referenced by the adcon is an external reference, the 
loader uses the absolute relocation constant. Otherwise, the 
loader uses the relative relocation constant. The loader tests 
the RLD entry to determine whether the relocation constant 
should be added to or subtracted from the input value of the 
address constant. After calculating the adcon value, the loader 
moves it back to the text. Finally, the loader frees the RLD 
entry and continues resolution. 


9 
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END PROCESSING 


END Card Processing 


If the RLD entry indicates delinking for a CM entry or for an LR 
entry converted to an ER, the loader subtracts the input address 
of common or of the LR from the value of the adcon. The result 
is a reference to a displacement in the common area or input 
module. When these entries are resolved (that is, CM address 
assigned or ER matched), absolute or relative relocation occurs. 


If the RLD entry indicates a PR reference, the loader performs 
absolute relocation as described above. 


End processing includes END card processing for object module 
CSECTs and end-of-module processing for object and load modules. 


The loader processes object module END cards for the length of 
the CSECT and for loaded program entry point definition. (CAlso, 
when an END card is recognized, the loader issues messages for 
any remaining LD entries for which no SD entry has been 
received.) In setting the length of the current CSECT, the 
loader determines whether the CSECT is a "no-length" CSECT. If 
it is, the loader uses the larger of the END card length and the 
length specified by the CESD SD entry as the CSECT length.!® If 
the END card of a "no-length™ CSECT does not specify a length 
and text has been received for the CSECT, the loader issues an 
error message. (CIn this case, the length of the text is used.) 


The loader determines whether the loaded program's entry point 
name or address has already been received. If it has, the 
loader does not process the END card for entry point. If not, 
the loader examines the END card for an ID to be used for the 
entry point. If an ID is present, the loader sets the entry 
point address to the address specified by the END card, or to 0 
if the END card specifies no &ddress. The loader translates the 
ID to a CESD entry address and saves the CESD address in 
location CMEPCESD. CIf there is no CESD entry for the ID, an 
invalid-ID message is issued.) The loader creates an RLD entry 
for the entry point Cat CMEPNAME). This entry is not treated as 
a regular RLD. 


If the END card does not specify an ID but does give a symbolic 
name to be used as the entry point, the loader saves the name at 
location CMEPNAME. If there is an SD or LR entry with that name 
in the CESD, the loader uses the address specified as the 
program entry point address. 


End-of-Module Processing 


At end of module for a load or object module, the loader 
Initializes the next input module for processing. If text has 
been passed through text records, the loader updates the text 
pointers, CMLSTTXT and CMNXTTXT, by the module length or, if no 
length was given, to the address of the last text received 
Crounded to doubleword value). Then, the loader determines 
whether the available storage has been exceeded. If so, an 
error message 1S issued, and loading is terminated. Otherwise, 
the loader clears the translation table and the module length 
counter (CCMMODLNG). All flags except the END and LIB flags are 
set off. The loader either begins processing another module 
from SYSLIN or, if end of file on SYSLIN is recognized, goes to 
process any secondary input. 


16 A "no-length" CSECT's SD can be matched by a CM entry, which 


defines an area larger than the CSECT. 
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SECONDARY INPUT PROCESSING (CHEWACALL ) 


After the loader has processed all primary input, it attempts to 
resolve remaining ERs in the CESD if CALL was specified. If 
there are no remaining ERs, the loader performs final processing 
for the loaded program. (See "Final Processing for the Loaded 
Program.™) 


The loader can resolve ERs from the link pack area and/or the 
SYSLIB data set. If the link pack area is available for 
resolution, and the RES option is specified, the loader searches 
the contents directory entry queue for the ERs before attempting 
to resolve them from SYSLIB. 


Secondary input processing is shown in "Diagram E1. Secondary 
Input Processing" on page 60. 


RESOLVING ERS FROM THE LINK PACK AREA 


The loader obtains the address of the link pack area directory 
search routine from the communication vector table (CVT). It 
then searches the ER chain for an ER that is not marked "never 
call" or “weak call." (A) When one is found, the name in the ER 
is passed to the LPA directory search routine. If the directory 
search routine does not find a match for the name, the loader 
searches for the next ER that is not marked "never call" or 
"weak call." 


If the directory search routine finds a match for the name, the 
loader puts the entry point in the CESD entry and changes the 
entry's type to SD. The loader then takes the entry off the ER 
chain, puts it on the SD chain, and makes a map entry for the SD 
if MAP is specified. Finally, the loader relocates all RLD 
table entries that are chained to the CESD entry. 


The loader then searches for the next ER that 1s not marked 
Fnever call™ or "weak call." 


This search 1s repeated until the entire ER chain has been 
processed. 


If there are still unresolved ERs after resolution from the link 
pack area, the loader performs library call processing. 
Otherwise, the loader performs final processing for the loaded 
program. (See "Final Processing for the Loaded Program.™) 


RESOLVING ERS FROM THE SYSLIB DATA SET 


Before resolving ERs from the SYSLIB data set, the loader checks 
whether an open SYSLIB data set has been passed. (The fourth 
entry in the DCB list, which is passed to the loader as a 
parameter, can point to an open SYSLIB DCB.) If an open SYSLIB 
DCB has been passed to the loader, the exit addresses in the 
passed SYSLIB DCB are saved in the communication area and 
replaced by the loader's own exit routine addresses. Ifa 
SYSLIB DCB has not been passed, a SYSLIB DCB is initialized and 
opened. 


(B) Otherwise, the loader constructs two lists used for BLDL 
information in the available storage. The available storage is 
defined by CMLOWTBL (the lowest address used by the loader 
tables and buffers) and CMLSTTXT (the highest address used by 
the loaded program's text). The two lists are the BLDL list and 
an address list. The loader uses the address list to store 
pointers to the ER entries in the CESD for which it constructs 
BLDL entries. The entries in the two lists have a one-to-one 


19 If the loader has opened a SYSLIN data set, the loader 
closes it before opening SYSLIB and reuses the DCB for 
SYSLIB. 


40 MVS/370 Loader Logic 


J 


2 


c 


C 


This document contains restricted materials of IBM. © Copyright IBM Corp. 1972,1983 


LY26-3922-0 


ASSIGNING ADDRESSES 


correspondence relative to the ER entries. Figure 19 on page 42 
shows this relationship. 


Before constructing the lists, the loader determines the maximum 
number of entries possible by dividing the amount of available 
storage by the number of bytes required for an entry in the two 
lists (BLDL list entry size-=16, address list entry size=4). 
Then, for each ER that is not marked "never call" or "weak 
call,™ the loader makes an entry in the BLDL list including the 
name specified by the ER and the address of the ER. 


After building the BLDL list, the loader constructs the address 
list by moving the pointers to the ERs from the BLDL list. This 
preserves the pointers, which are overlaid in the BLDL list 
during BLDL operation. 


Finally, the loader issues the BLDL macro instruction. If an 
I/QO error occurs during execution of the BLDL, the loader logs 
the error and performs final processing for the loaded program. 


(C) Otherwise, the loader moves the relative track addresses 
CTTRs) returned in the BLDL list to the associated CESD entries. 
Each CESD entry for which a TTR was returned is marked to 
indicate that it contains an auxiliary storage address. 


The loader issues a FIND macro instruction for each ER entry 
marked "TTR received.” The loader processes each module located 
in the same way as it processes primary input modules. 


Because SYSLIB contains only load modules or only object 
modules, processing for each module located is the same. If 
SYSLIB contains object modules, the loader first primes the 
buffers and then performs object module processing. If SYSLIB 
contains load modules, the loader performs load module 
processing. See "Primary Input Processing.” 


The loader resolves as many ERs from SYSLIB as possible. It 
then performs final processing for the loaded program. (If 
during processing of one or these modules a program size error 
occurs, the loading procedure is terminated with an error 
message. ) 


FINAL PROCESSING FOR THE LOADED PROGRAM 


After all possible ERs have been resolved, the loader performs 
the following for the loaded program: 


e Assigns addresses for common areas 

e Assigns addresses for displacement in the external DSECT 
(pseudo registers) 

° Issues messages for all unresolved ERs 

° Finds the address of the program's entry point 

e Builds a condensed symbol table if the loader is operating 


in time-sharing mode 

° Identifies the loaded program to the system, unless the 
processing portion of the loader was directly invoked by the 
name HEWLOADR 


° Writes out the diagnostic message dictionary 


FOR COMMON AREAS (COMMON) 


The loader assigns addresses for the loaded program's common 
areas by processing entries on the CESD CM chain. 


For each CM entry, the loader assigns the next available storage 
address above the text of the loaded program. CThe highest text 
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ASSIGNING ADDRESSES 
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Figure 19. BLDL List and Address List 
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address before the allocation of a common area is saved in the 
communication area at CMTOPCOD. This allows the loader to 
continue using work space that may be overlapped with common ) 
areas. The address contained in CMNXTTXT rounded to doubleword 
value 1s the address used. The loader ensures that there is 
enough available storage for the common area and then updates 
the pointer to available storage by adding the length from the 
current common entry to the CMNXTTXT value. (CIf there is not 
enough storage, an error message is issued and loading is 
terminated.) Next, if the MAP option was chosen; the common 
area 1S mapped. Finally, the loader relocates the address 
constants referring to the current “common" definition. (The 
adcons are relocated through processing the RLDs chained from 
the current CESD CM entry.) 


After all the CM entries in the CESD have been processed, the 
loader assigns addresses for external DSECT displacements. 


FOR EXTERNAL DSECT DISPLACEMENTS (PSEUDOR ) 


The loader assigns contiguous storage for displacements in the 
loaded program's external DSECT by processing the CESD PR chain. 
(The storage for all DSECTs is obtained via one GETMAIN macro 
instruction, and the individual DSECTsS are displacements within 
the area.) 


For each entry on the chain, the loader subtracts the alignment 
factor from hexadecimal "FFFF". The loader adds the difference 

to the location counter for the PRs to obtain the assigned 

address of the current external DSECT. (The location counter is 

0 at the beginning of PR processing.) After calculating the 

current address, the loader updates the location counter by 

adding the length of the displacement specified in the CESD PR. 

Then the loader maps the DSECT displacement and relocates all 
address constants referring to it. These are indicated by RLD 

table antries chained to the PR entry. } 


CESD entry 


ERNAME| for ERNAME] 
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CESD entry 
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e BLDL List and Address List before BLDL 
macro instruction is issued. 

e After execution of the BLDL, the BLDL List 
contains TTRs for library-resolved ERs. 
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After processing all the PR entries, the loader stores the value 
contained in the location counter (the cumulative length of all 
DSECTs) in all locations in the loaded program requesting it. 
These locations are chained from CMCXDPT in the communication 
area.?° (If NCAL was specified, there is no CXD chain pointer 
in CMCXDPT.) 


ISSUING UNRESOLVED ER MESSAGES 


CHECKING THE LOADED 


For all ERs remaining in the CESD that are not marked "weak 
call,™ the loader issues either error or warning messages. If 
NCAL is specified or if an ER is marked "never call,™ the loader 
issues a warning message. Otherwise, an error message 15 
issued. An error message 15 also issued if no text was loaded 
for the program. 


PROGRAM'S ENTRY POINT 


After the loaded program has been processed, the loader checks 
to determine whether the entry point name and address have been 
received. This is determined by testing the program flag field 
CCMPRMFLG). Processing for the possible conditions 15 as 
follows: 


° Entry point name and address both received. No further 
entry point processing is required. 


e Only entry point name received. If the entry point name was 
specified by the EP= parameter but no address for the name 
Was received, the loader issues an error message. Then, if 
text for the SYSLIN data set was pointed to by MOD records 
instead of being passed through text records, the address of 
the first byte of the first extent described on a MOD record 
is assigned as the entry point. OQtherwise, the loader 
assigns the address of the first byte of loader-constructed 
text Cfound in CMBEGADR) as the entry point. 


° Only entry point address received. If the entry point 
address was received (CMEPADDR), the loader determines 
whether the referenced symbol is an ER. If so, the loader 
assigns the first byte of text as the entry point. 


e Neither entry point nor address received. The loader issues 
an error message and uses the first byte of text as the 
entry point. 


After determining the entry point for the loaded program, the 
loader calculates the program's total length. The length equals 
the difference between the address of the next available storage 
CCMNXTTXT) and the address of the first byte of text (CMBEGADR) 
added to the lengths of any extents that may be passed through 
MOD records. The loader then prints out the entry point address 
and the total length of the loaded program. 


20 See Assembler Language for the use of external DSECTs and 
the CXD statement. 


Method of Operation 43 


This document contains restricted materials of IBM. © Copyright IBM Corp. 1972,1983 
LY26-3922-0 


IDENTIFYING THE LOADED PROGRAM 


If program loading is successful, the loader prepares to 
identify the program to the control system.?! <A parameter list 

1s constructed to pass the program name, addressing mode, entry 

point address, and extent list information to the IDENTIFY macro 
instruction. (The extent list defines the storage that the 

loaded program occupies.) If storage is not available for this 
parameter list, an error message is issued and loader processing 

is terminated. 


The loader initializes the parameter list with the program name, 
addressing mode, entry point address, and length and address of 
the loader-constructed program (Cas the first extent). This 
information is found in the communication area. If the loader 
is operating in time-sharing mode, it attempts to build a 
condensed symbol table for use during the program's execution. 
An entry 1s made in the table for each control section and 
common area in the program. This table becomes the second 
extent of the program, and its address and length are placed in 
the extent list. If there is not enough storage for the entire 
table, 1t is not built, and the second extent of the program is 
assigned a length of zero. The extent list is then completed 
with the extent information that was passed on MOD records and 
saved in the communication area. 


Finally, the IDENTIFY macro instruction is issued. If 
identification processing 1s not successful, an error message 15 
issued and loader processing is terminated. Otherwise, a flag 
indicating that the program has been identified is set in the 
communication area. 


END OF LOADING 


After all processing for the loaded program is complete, the 
loader processing portion performs termination processing and 

then passes control to the loader control portion. The control 
portion then attempts to execute the loaded program. 


LOADER PROCESSING TERMINATION 


If the SYSLOUT and/or SYSTERM data set was opened, the loader 
prints a diagnostic dictionary describing the errors encountered 
during loading. (CAS errors occur, the loader sets a flag 
indicating the type of error in the bit map field (CCMBITMAP) in 
the communication area.) The loader determines the highest 
error severity indicated and returns it to the caller at 
termination. 


Next the loader ensures that all diagnostic data has been 
written to SYSLOUT and then closes both the output and the 
current input data sets.2# 


The loader then sets up the return parameter list. If the 
processing portion of the loader was invoked through the entry 
point HEWLOAD, the name of the identified program is placed in 
this parameter list. Otherwise, the list contains the virtual 
storage address and size of the loaded program. 


21 This processing is performed only when the processing 


portion of the loader is invoked, either directly or by the 
control portion of the loader, by the name HEWLOAD. 

22 The current input data set is SYSLIB unless no library 
searching was done. The loader closes SYSLIN when it opens 
SYSLIB. However, if a SYSLIB DCB marked open was passed to 
the loader, SYSLIB is not closed. 
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Finally, the loader issues a FREEMAIN macro instruction for all 
its processing storage not assigned to the loaded program or to 
the condensed symbol table. CIf the completion code for loading 
1s greater than 4, the storage occupied by the loaded program is 
also released, including preloaded text passed through MOD 
records. If the loaded program was identified, the storage it 
occupied is released through the execution of the LOAD and 
DELETE macro instructions.) The loader then returns control to 
the control portion. 


LOADER CONTROL TERMINATION 


Before attempting to execute the loaded program, the loader 
control portion issues a DELETE macro instruction for the 
processing portion. Then, if the condition code for loading is 
not greater than 4, the loader control portion, through the 
execution of an ATTACH macro instruction, passes the user's 
parameter list to the loaded program for its execution. 


After the program's execution, the loader control portion issues 


a DELETE macro instruction for the loaded program, frees its 
processing storage, and returns to the scheduler. 
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OPERATION DIAGRAMS 


The following diagrams show the flow of data through the loader 
and are used with the descriptions given previously in this 
section to give an integrated picture of the loader logic. Each 
diagram has an alphameric identification (for example, Al). 
Within each diagram, specific points of reference have 
alphabetic labels. When the description at the beginning of this 
section discusses a function, it refers to the operation diagram 
as a whole and to the specific labeled references where 
appropriate. For example, the description of initialization 
refers to Diagram Bl. Within the discussion, reference (B) 
refers to point (B) in Diagram Bl. 


The symbols used in the diagrams are shown in the following 
chart. 


LEGEND FOR DIAGRAMS 


aS eae Main Processing; —_—_——— ey Subsidiary Processing; 
Primary flow Secondary Flow 








————» Data Movement : — -» Data Reference 
Created in This Previously Existing or 
Operation or Routine Defined in Program 
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DIAGRAM A2. LOADER INVOCATION 
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DIAGRAM Bl. LOADER/SCHEDULER INTERFACE AND INITIALIZATION 
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DIAGRAM Cl. PRIMARY INPUT CONTROL AND BUFFER ALLOCATION 
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DIAGRAM Dl. OBJECT MODULE PROCESSING 
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DIAGRAM D2. LOAD MODULE PROCESSING 
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DIAGRAM D3. ESD RECORD PROCESSING (GENERALIZED) 
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DIAGRAM D4. EXAMPLE OF INPUT ESD PROCESSING OF SD-SECTION DEFINITION (HEWLESD) 
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DIAGRAM D5. EXAMPLE OF INPUT ESD OF ER-EXTERNAL REFERENCE PROCESSING (HEWLESD) 
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DIAGRAM D6. EXAMPLE OF ESD ID TRANSLATION 
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DIAGRAM D7. OBJECT MODULE TEXT PROCESSING 
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DIAGRAM D&. LOAD MODULE TEXT PROCESSING 
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DIAGRAM D9. RLD RECORD PROCESSING 
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ORG ZA OF THE LOADE 
Cc 
Figure 20 shows the organization of the loader. The flow of 
control through the first four levels of the processing portion 
of the loader (module HEWLOADR) is listed in the control level 
tables below. 
Load Module Aaa 
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ROUTINE CONTROL-LEVEL TABLES 


The routine descriptions within a level are listed 
alphabetically in Figure 21 through Figure 24. 


Routine Purpose 

HEWLIOCA Initialization, primary 
input control, and 
allocation processing 

Figure 21. HEWLOADR—Level 1 
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Figure 22 (Part 1 of 2). HEWLOADR—Level 2 
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Calling Conditions 
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Routine 
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Figure 22 (Part 2 of 2). 


Purpose 


Buffer Management 


Identification of the 
loaded program to the 
control program 


Process a load module 


Print output to SYSLOUT 
data set 


Process an object module 


Read records into all 
but one buffer before 
HEWLRELO receives 
control 


Called 
Routines 


FREECORE 


GETCORE 


IDENTER 


IDMINI 


HEWERROR 
HEWLREAD 
HEWLEND 
HEWLESD 
HEWLRLD 
LMTXT 
RDCHECK 


WTWRITE 
WTCHECK 
HEWLREAD 
HEWLEND 
HEWLESD 
HEWLRLD 
HEWL TXT 
HEWLMOD 
RDREAD 


HEWLOADR—Level 2 


Calling Conditions 

If previous or current Cnot the 
first) allocation is for object 
module 

If no previously allocated area 
is large enough for current 
request 

Always, unless extents will 
overlap loader work space 
Always, unless extents will 
overlap loader work space 

If an error occurs 

Always 

If end-of-module is indicated 
If CESD record is received 

If RLD record is received 


If TXT record is read in 


If DECB was previously written 


Always 
Always 
Always 
If END card received 
If ESD card received 
If RLD card received 
If TXT card received 
If MOD card received 


Always 
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. Called : ae | ) 
Routine Purpose Routines Calling Conditions 
COMMON Assign addresses to PSEUDOR Always 
common areas 
HEWLMAP Always, unless no CM entries were 
received 
HEWLERTN Always, unless no CM entries were 
received 


FREECORE Chain deallocated area none 
to free list 


GETCORE Allocated storage for HEWERROR If table overflow occurs 
allocation request 

IDENTER Create entry in extent none 
list 

IDMINI Create a condensed none 


symbol table 


HEWERROR Handle error messages,» HEWLPRNT If SYSLOUT data set is open 
severity code 4 errors 
HEWTERM If the TERM option is specified 
HEWLCNVT Convert binary quantity none 
to hexadecimal 
HEWLEND Process END card, TRANSID If END card specifies entry point 
reinitialize for next address 
module ; 
HEWERROR If error occurs in end card 
processing 
HEWLERTN Relocate all adcons HEWERROR Invalid 2-byte adcon 
indicated by RLD chain 
HEWLESD Create CESD from input LOADPROC If input is a load module 
ESD/CESD 
CESDSRCH Input entry is not NULL or PC 
TRANSLAT If NULL entry is made 
CESDENT If PC or LR entry is required 
ENTER If PC entry is required 
CKECKEP If PC entry is required 
MATERSD2 If PC entry is required 
TRANSID If LD/LR is received 
HEWLMAP Create map entry for HEWLPRNT Always 
referenced location in IEWLCNVT Always 


loaded program 


Figure 23 (Part 1 of 3). HEWLOADR—Level 3 
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Routine 
HEWLMOD 


HEWLODE 


HEWLPRNT 


HEWLREAD 


HEWLRELO 


HEWLRLD 


HEWL TXT 


HEWOPNLD 


HEWPRIME 


HEWTERM 


Figure 23 (Part 2 of 3). 


Purpose 


Process MOD card, store 
text origin, length, and 
extent information 


Process a load module 


Print output to SYSLOUT 
data set 


Handle request for data 


Process an object module 


Relocate adcons 
indicated by RLD entries 
received or chain RLDs 
off CESD entry for R 
pointer 


Move object module text 
to correct space 


Open SYSLIB; close 
SYSLIN 


Read records into all 
but one buffer before 
HEWLRELO receives 
control 


Print output to SYSTERM 
data set 


Called 
Routines 


ALLOCATE 


HEWLREAD 
HEWLEND 
HEWLESD 
HEWLRLD 
LMTXT 
RDCHECK 


WTWRITE 
WTCHECK 
RDREAD 

RDCHECK 
HEWLREAD 
HEWL END 
HEWLESD 
HEWLRLD 
HEWLTXT 

TRANSID 


ALLOCATE 


HEWLERTN 


TRANSID 

RELOREAD 
HEWERROR 
HEWBUFFR 


RDREAD 


WTWRITE 


WT CHECK 


HEWLOADR—~—Level 3 


Calling Conditions 

If extent information is passed 
on MOD card 

Always 

If end-of-module is indicated 
If ESD record is read in 

If RLD record is read in 

If TXT record is read in 


If DECB was previously written 


Always 
Always 
Always 
Always 
Always 
If END card is received 
IF ESD card is received 
If RLD card is received 
If TXT card is received 


Always 
If no free RLD entry is available 


If relocation is possible or if 
delinking required 


Always 
Always 
If invalid ID received 


Unless SYSLIB was not opened 


Always 


Always 


Always 
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Routine 
LMTXT 


RDCHECK 
RDREAD 


WT CHECK 
WIWRITE 


Figure 23 (Part 3 of 3). 
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Purpose 


Read load module text 
into main storage 


Check DECB 


Read input using DECB 
information 


Check DECB 


Write output using DECB 
information 


Loader Logic 


Called 
Routines 


TRANSID 


HEWLREAD 
HEWERROR 
PROCEOM 
none 


none 


none 


none 


HENWLOADR—Level 3 


Calling Conditions 


Always 


Unless record is to be skipped 
If text record not received 


Always 


1972,1983 
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called = 
Routine Purpose Routines Calling Conditions 
ALLOCATE Allocate table extent HEWERROR Table overflow 
CESDENT Get CESD entry form free ALLOCATE No free entries on list 
entry list or call 
ALLOCATE to obtain an 
entry 
CESDSRCH Search CESD for input MATCHED If name is found 
name 
NOMATCH If name 1s not found 
CHECKEP Check CESD entry for none 
specified entry point 
ENTER Enter information in HEWERROR If program is too large 
CESD entry for PC or SD 
HEWBUFFR Buffer management FREECORE If previous or current Cnot the 
first) allocation request is for 
object module 
GETCORE If no previously allocated area 
is large enough for current 
request 
HEWERROR Handles error messages, HEWLPRNT If SYSLOUT data set 1s open 
severity code 4% errors 
HEWTERM If the TERM option is specified 
HEWLCNVT Convert binary quantity none 
to hexadecimal 
HEWLEND Process END card, TRANSID If END card specifies entry point 
reinitialize for next address 
module 
HEWERROR If error occurs in END card 
processing 
HEWLERTN Relocate all adcons HEWERROR Invalid 2-byte adcon; invalid 
indicated by RLD chain 3-byte adcon 
HEWLESD Create CESD from input LOADPROC If input is a load module 
ESD/CESD 
CESDSRCH Input entry is not NULL or PC 
TRANSLAT If NULL entry is made 
CESDENT If PC or LR entry is required 
ENTER If PC entry is required 
CHECKEP If PC entry is required 
MATERSD2 If PC entry is required 
TRANSID If LD/LR is received 


Figure 24 (Part 1 of 3). HEWLOADR—Level 4 
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Routine 
HEWLMAP 


HEWLPRNT 


HEWLREAD 


HEWLRLD 


HEWL TXT 


HEWTERM 


LMTXT 


LOADPROC 


MATERSD2 


PROCEOM 


PSEUDOR 


Figure 24 (Part 2 of 3). 


Purpose 


Create map entry for 
referenced location in 
loaded program 


Print output to SYSLOUT 
data sat 


Handle request for data 


Relocate adcons 
indicated by RLD entries 
received or chain RLDs 
off CESD entry for R 
pointer 


Move object module text 
to correct spaces 


Print output to SYSTERM 
data set 


Read load module text 
into virtual 


Preliminary processing 
for load module CESD 


Test length and request 
map entry 


Go to process 
end-of-module 


Assign displacements to 
pseudo registers 
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Called 
Routines 


HEWLPRNT 


HEWLCVNT 
RDCHECK 


WRWRITE 
WT CHECK 
RDREAD 
RDCHECK 
TRANSID 


ALLOCATE 
HEWLERTN 


TRANSID 
RELOREAD 
HEWERROR 
WTWRITE 
WT CHECK 
TRANSID 
HEWLREAD 
HEWERROR 
PROCEOM 
CESDENT 


CHAINING 


HEWLEND 


HEWLPRNT 


FINISHUP 
HEWLMAP 
HEWLERTN 


HEWLOADR——Level 4 


Calling Conditions 
Always J 


Always 


If DECB was previously written 


Always 
Always 
Always 
Always 


Always 


If no free RLD entry is available 


If relocation is possible or if 
delinking is required 


Always 

Always 

If invalid ID is received 
Always 
Always 

Always 

Unless record is to be skipped 

If text record not received 


Always 
If entry type is PC,SD,LR 


Always 
Always 
If displacement is assigned 


Always 
If displacement is assigned 


If displacement is assigned 
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Routine 
RDCHECK 
RDREAD 


RELOREAD 


TRANSID 


TRANSLAT 


WTCHECK 
WIWRITE 


Figure 24 (Part 3 of 3). 


Purpose 
Check DECB 


Read input using DECB 
information 


Go to HEWLREAD for more 
input 


Translate input ESD ID 
to CESD address 


Make a translation table 
entry 


Check DECB 


Write output using DECB 
information 


Called 
Routines 


none 


none 


HEWLREAD 


ALLOCATE 


HEWERROR 


TRANSID 


none 


none 


HEWLOADR—Level 4 


Calling Conditions 


Always 
If new extant is required 
If table overflow or invalid ID 


occurs 


Unless LD entry 


Organization of the Loader 69 


This document contains restricted materials of IBM. © Copyright IBM Corp. 1972,1983 
LY26-3922-0 


MICROFICHE DIRECTORY 


J 


The microfiche directory is designed to help you find named 
areas of code in the program listing, Which 1s contained on 
microfiche cards at your installation. Microfiche cards are 
filed in alphameric order by object module name. If you wish to 
locate a control section, entry point, table, or routine on 
microfiche, find the name in the first column and note the 
associated object module name. You can then find the item on 
microfiche. 


Description Object Module CSECT 

Allocation HEWLDREL HEWLRELO Allocates storage for 

Routine table entries 

Table HEWLDREL HEWLRELO Pointers to 
translation table 
extents 

Table HEWLDREL HEWLRELO Pointers to CESD type 
chains 

Label HEWLDLIB HEWLLIBR Assigns addresses to 
common 


DSECT HEWLDIOC HEWLIOCA Model DECB 


DSECT HEWLDIOC HEWLIOCA 
HEWLDREL HEWLRELO 
HEWLDLIB HEWLLIBR 


Label HEWLDLIB HEWLLIBR Prints finishing J 
messages 

Entry point HEWLDLIB HEWLLIBR Automatic library call 
processing 

Entry point HEWLDLIB HEWLLIBR Diagnostic dictionary 
processing 

Buffer allocation HEWLDIOC HEWLIOCA Buffer and DECB 

routine allocation routine 


Entry Point HEWLDLIB HEWLLIBR Error log routine 


Entry Point HEWLDREL HEWLRELO | Binary-~Hex conversion 
routine 

Entry Point and HEWLDCTR HEWLCTRL | Loader control module 

CSECT 


DSECT HEWLDIOC HEWLIOCA | Communication area 
HEWLDLIB HEWLLIBR | 
HEWLDREL HEWLRELO 


CSECT SYSGEN option defaults 
Entry Point End processing 

Entry Point RLD relocation routine 
Entry Point ESD record processing 


ALLOCATE 


CMTRCTRL 





CMTYPCHN 


COMMON 


DECB 





ERCODES Error code definitions 










FINISHUP 


HEWACALL 


HEWBTMAP 


HEWBUFFR 


HEWERROR 
HEWLCNVT 


HEWLCTRL 


HEWLDCOM 





HEWL DDEF 
HEWLEND 
HEWLERTN 
HEWLESD 


2 


a | 
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HEWL IDEN 


HEWL IDEN 


HEWLIOCA 


HEWLLIBR 


HEWLMAP 
HEWLMOD 
HEWLOAD 


HEWLODE 

HEWLPRNT 
HEWLREAD 
HEWLRELO 


HEWLRELO 


HEWLRLD 


HEWL TXT 


HEWOPNLB 


HEWTERM 
IDMINI 


INITMAIN 


LMTXT 


MODELDCB 


OPENEXIT 


SYNAD Entry Point HEWLDIOC 


Entry Point HEWLDIDY 
Entry Point and HEWLDIDY 
CSECT 


HEWLDIOC 


CSECT 
HEWLIDEN 


HEWLIDEN 


HEWLIOCA 


Entry Point and 


CSECT 


CSECT HEWLDLIB 


Entry Point HEWLDREL 
Entry Point HEWLDREL 


Entry Point HEWLDIOC 


Entry Point HEWLDLIB 
Entry Point HEWLDIOC 
Entry Point HEWLDIOC 


Entry Point HEWLDREL 
CSECT HEWLDREL 


Entry Point HEWLDREL 


Entry Point HEWLDIOC 


Entry Point HEWLDIOC 


Entry Point HEWLDIOC 


_— 


DSECT HEWLDIOC 


Entry Point HEWLDIOC 





HEWLLIBR 


HEWLRELO 
HEWLRELO 
HEWLIOCA 


HEWLLIBR 
HEWLIOCA 
HEWLIOCA 
HEWLRELO 


HEWLRELO 


HEWLRELO 


HEWLRELO 


HEWLIOCA 
HEWLIOCA 


HEWLIOCA 


HEWLIDEN 


HEWLIOCA 


HEWLLIBR 


HEWLIOCA 


HEWLIOCA 
HEWLLIBR 


HEWLIOCA 


Builds extent list for 


IDENTIFY and issues 
IDENTIFY 


Identification routine 


Initialization, I/0, 
control, and 
allocation processing 





Automatic library call 
and load module 
processing 


Creates map printout 


MOD record processing 





Entry point for 


loading with 
identification 





Load module processing 


Object module 
processor 


Object module, ESD, 


RLD, and map 
processing 





RLD record processing 
Object module text 
processing 

Opens SYSLIB data set 
Object module buffer 
prime routine 

SYSTERM routine 


Constructs MINI-CESD 


for test package if 
TSO is operating 





Initial work area 
Load module text 
processing 

Model DCB for SYSLIN, 
SYSLIB 


DCB exit routine 
Processes pseudo 
registers 


SYNAD routine 
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Translates ESD ID to 
CESD address 


TRANSID Entry Point HEWLDREL HEWLRELO 









U 
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DATA AREAS 


This section provides a detailed description of internal data 


areas used during loader processing. The data areas are 
described in alphabetic order. 


Also 
















HEWLDCOM 
INITMAIN 







Built By | Used and/or Modified By 


CESD control table HEWLESD HEWACALL,» HEWLESD 

CCMTYPCHN) 

CESD table HEWLESD HEWACALL, HEWLERTN, HEWLESD, 
HEWLRLD, HEWLTXT, LMTXT 

Condensed symbol table HEWLIDEN TSO test facilities 


Extent chain HEWLMOD HEWLIDEN 
IDENTIFY parameter list HEWLIDEN IDENTIFY macro instruction 


RLD table! HEWLRLD HEWACALL, HEWLERTN, HEWLRLD 


Translation table HEWLESD HEWACALL, HEWLESD, HEWLRLD, 
HEWLTXT, LMTXT, TRANSID 


1972,1983 


included in this section is a summary of data area use and 
construction (Figure 25). 














HEWLIOCA 







Figure 25. Data Area Construction and Usage 


Notes to Figure 25: 


1 


2 


Built and processed entirely within one routine. 


Major communication area throughout loader processing. 


Data Areas 
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Address List ) 
Built by the Secondary Input Processor 
Pos fe fos [| Tia 
CESD entry address (4 bytes each entry) 
The entries in this list are in one-to-one 
correspondence with the BLDL list entries. 
The Loader stores the address from the BLDL 
entry in the address list before issuing the 
BLDL macro instruction 
Figure 26. Address List 
BLDL List 


Built by Secondary Input Processor 


(entry FF) 


<< —_—__—__—__———— each entry ——__-______—__»> 
16 bytes 


Not used by the Loader 


CESD address/ TTR 
Originally contains the CESD address 
of an ER. (4 bytes) If the name was 
found in the SYSLIB directory, BLDL 


replaces the CESD address with TTR. 
Name field (8 bytes) (bytes 12-14) 


TT - relative track number 
R - block number on the track 





Length (2 bytes) 
LL = length of each entry in the BLDL 
list (16 bytes in the Loader) 


Number (2 bytes) 


FF = total number of entries in the BLDL list 


Figure 27. BLDL List 
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CESD Control Table (CMT YPCHN) 
Built by the ESD Processor 





CESD type chain pointer (4 bytes each entry) 


The pointers, Po Ps, are listed in the 


following order by type : SD, 
LDo ER. ER; PC, cCM, -PR, 
NULL 


Note : The CESD control table is defined in the communications 


area (HEWLDCCM), 
Figure 28. CESD Control Table CCMTYPCHN) 
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CESD Table Entry 
Built by the ESD processor 


ae 


Use depends on entry type 
Type LD - ESD ID for SD; preliminary use only (bytes 18-19) 





Type PR - boundary alignment (byte 16) and length (bytes 18-19) 
Alignments 
7 - doubleword 


3 - fullword 
1 - halfword 


0 - byte 


Types SD, PC, LR, CM - relative relocation constant 


Type ER - 0; if ER was created from an LR - input address 


Type CM - address of extended portion of entry 


Address/displacement field (3 bytes) 
Types SD, PC, LR, CM - Loader~ assigned address 
Types CM, PR, ER - address of RLD entry chain (0, if no RLDs) 
Type PR - displacement within DSECT 


Type LD - input address (preliminary use only) 





Flags/type field (1 byte) FFFFF 


Section definition (SD) - XOX00 
Label definition (LD) - 0X000 


External reference (ER) - XXXXX 
Label reference (LR) - X0000 
Private code (PC) - 00000 
Common (CM) - 00000 


Pseudo register (PR) - 00000 


Namefield (8 bytes) 
8 character symbolic name or blanks for blank common 
and private code (unused for extended portion of CM entry) 








Chain address (4 bytes) 
Pointer to next entry on CESD type chain; if end of chain, 0. 
(unused for extended portion of CM entry) 


Figure 29. CESD Entry 
ee ee 
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Ldlg 


900 
001 
010 


011] 
100 
101 
110 


F,_5 are flags, T)_3 indicate type 


F,-"delete", F3="no length" 

Fo-''LD processed"! 

F,-"delete," Fa-"weak call," F3-"BLDL tried," 
F4-"'TTR found, '' F5-"'never call"’ 

F, -''delete'' 


J 


J 
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Condensed Symbol Table Entry 


Built by the Identification Processor 


Address - Assigned address of this 
symbol (3 bytes). 






Type - (1 byte) 
Section definition (SD) xxxxx 000 
Common (CM) xxxxx 101 


Symbol - The 8-character extemal name (8 bytes). 





Figure 30. Condensed Symbol Table Entry 
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Data Event Control Block 
Built by |[/O, Control, and Allocation Processor | 


ene eee Added by the | 
~t- : Standard DECB Loader 










DECDECPT (4 bytes) 
address of next DECB (4 bytes) 





DECIOBPT (4 bytes) 
address of the I/O block 





DECAREA (4 bytes) 
address of the read/write 
area for the data 


a4 








L__ pDECDCBAD (4 bytes) 
address of the DCB for the read/write data set 





——-—— DECLNGTH (2 bytes) 
length of the data to read/write 








—.-DECTYPE (2 bytes) 
type of the I/O macro instruction and options 


-———— DECSDECB (4 bytes) 


event control block 


Figure 31. Data Event Control Block CDECB) 
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Extent Chain Entry 


Built by the MOD Processor 


Length - Length of the extent (4 bytes), 







Address - Address of the extent derived from 
the MOD record (4 bytes), 


Chain Address - Address of the next entry on the extent 
chain; if end of chain, zero (4 bytes). 


Figure 32. Extent Chain Entry 
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A TT eS SS eS SS rs SSS SSS rs AS rH SS STEDSIUUFSSPSSNOPS 


IDENTIFY Parameter List 


Built by the Identification Processor a 


Address of entry point of program to be identified 


Program name - the 8-character symbolic name 


Length, in bytes, of extent list 


Number of extents described in this list 


Length of extent 1 (Loader-constructed program) 


Length of extent 2 (Condensed symbol table) 





Extent ) 
List 


Length of extent n* 
Address of extent 1 (Loader-constructed program) 


Address of extent 2 (Condensed symbol table) 





Address of extent n 





+ ________________. ___________4 by tes 


*A hex '80' in the high-order byte signifies the last length. 
Figure 33. IDENTIFY Parameter List 


LE ET eC SSS SSS yess sr ry sre 
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Offset 
Decimal Hex 
0 0 
8 8 
12 Cc 
16 10 
20 14 
24 18 
28 1c 
32 20 
36 24 
40 28 
44 2c 
48 30 
52 34 
56 38 
60 3C 
64 40 
68 G4 
72 48 
76 4C 
80 50 
8&4 54 
88 58 
92 5C 
96 60 
100 64 
102 66 
104 638 
106 6A 
108 6C 
112 70 
116 74 
120 78 
128 80 
136 88 
144 90 
152 98 
160 A0 
168 A& 
172 AC 
176 BO 
177 Bl 
178 Be 


Figure 34 (Part 1 of 3). 


Length 


RK BLOM COMO OORANMMMNHHDHHHHHHHHHHHHHHHHHHHHDH & 


Symbol 
CMXDBLWD 


CCMADCON) 


CMFSTSAV 
CMBEGADR 
CMRDCBPT 
CMWDCBPT 
CMTDCBPT 
CMRDECPT 
CMWDECPT 
CMGETREC 
CMPUTREC 
CMTRMREC 
CMNXT TXT 
CMLSTTXT 
CMLOWTBL 
CMHITBL 
CMIOLST1 
CMIOLST2 
CMIOLST3 
CMCORE1 
CMCORE2 
CMTOPCOD 
CMLIBEOD 
CMLIBSYN 
CMLIBEXL 
CMBLKSIZ 
CMMAXLNE 
CMMAPLIN 
CMWLRECL 
CMMAXLST 
CMMAINPT 
CMMAINSZ 
CMPRNTDD 
CMLINDD 
CMLIBDD 
CMTERMDD 
CMEPNAME 
CMPGMNM 
CMLINDCB 
CMLIBDCB 
CMPRMFLG 
CQRES 
CQMAP 
CQPRINT 
CQLET 
CQCALL 
CQEPNAME 
CQEPADDR 
CQTERM 
CMIOFLGS 
CQEOCB 
CQEOFB 
CQEOFSB 
CQRECFM 


(CQUNDEF) 


CQFIXED 
CQIGNCR 
CQIOERR 
CMFLAG3 
CQTS 
CQ@PGMNM 
CQPASLIN 
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Description 


Temporary doubleword 

Relocation alignment area 

Pointer to first save area 

Default entry point to module 

Input DCB pointer 

Output DCB pointer 

System DCB pointer 

Input DECB pointer 

Output DECB pointer 

Input logical record pointer 

Output logical record pointer 

System buffer pointer 

Next address to be assigned to a CSECT 
Highest text address assigned to current CSECT 
Lowest address assigned for loader tables 
Highest storage address available to loader 
Open list, DCB pointer #1 

Open list, DCB pointer #2 

Open list, DCB pointer #3 

Corresponds to CMNXTTXT for pre-loaded text 
Corresponds to CMLSTTXT for pre-loaded text 
Highest text address before common allocated 
EODAD error routine pointer for passed SYSLIB 
SYNAD error routine pointer for passed SYSLIB 
Exit list pointer for passed SYSLIB 

Block size of current input object module 
Maximum line count CSYSPRINT) 

Length of map line 

SYSPRINT record size 

Maximum length of invalid options list 
Variable conditional GETMAIN address 
Variable conditional GETMAIN size 

Print ddname 

Primary input ddname 

Library ddname 

SYSTERM ddname 

Entry point name 

Program name 

Passed SYSLIN control block pointer 

Passed SYSLIB DCB pointer 

Parameter flags: 


X'O1' RES/NORES 

X'02" MAP/NOMAP 

X'04" PRINT/NOPRINT 

X'08" LET/NOLET 

X'10" CALL/NOCALL 

X¥'20' Entry point name defined 
X'GO0" Entry point address defined 
X'*80' TERM/NOTERM 

I/0 flags: 

X'O1' End of concatenation 

X'02' End of file 

X'O4" End of file significance 
X'08' Input record format (0 is Fixed) 


Separate name in allocation for undefined 


X*'10! Fixed record format 
X'20' Ignore control record on load module 
X'*40" An I/70 error has occurred 


Assorted flags: 


X'02"' $Time-sharing environment 
X'04¢' $Program name passed 
X'O08" SYSLIN DCB passed 


HEWLDCOM DSECT ~ Communication Area 
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Offset 


Decimal Hex 


179 


180 
184 
224% 
228 
232 
236 
240 
244 
248 
376 
380 
384 
388 
392 
396 
400 
404 
408 
412 
416 


420 
424 
428 
432 
436 
440 
444 
448 
450 
452 
454 
456 
459 


459 


460 


Figure 34 (Part 2 of 3). 


B3 


1CA 


1CB 


1cC 
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Length 


an 


N 
Os 


RFPNNMMNNMA HRP DHPHDH HAH HDHHHHHPHDHDPHRHDPHHL|HLHD HGH 
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Symbol 


CQPASLIB 
CQINCORE 
CQIDEN 
CMFLAG4 
CQESDS 
CQMOD 
CQNOEX 
CQMINI 
COMVT 
CQCOMMON 
CQTRMOPN 
CQIDONE 
CMSYSTYP 
CMRSAVE 
CMXLCHN 
CMBITMAP 
CMERLIST 
CMRLDCHN 
CMESDCHN 
CMEPADDR 
CMTRCTRL 
CMBLDLPT 
CMCXDPT 
CMFRECOR 
CMMODLNG 
CMOBJST 
CMTEMPCH 
CMEPCESD 
CMPREVPT 
CMLOADCH 
CMESDSAV 
CMSDCHN 


CCMTYPCHN) 


CMLDCHN 
CMERCHN 
CMLRCHN 
CMPCCHN 
CMCMCHN 
CMPRCHN 
CMNULCHN 
CMCURRID 
CMLNECNT 
CMBLDLNO 
CMWTBFCT 
CMNUMXS 
CMLIBFLG 
CQKEEPS 
CQDELETE 
CQAUTOC 
CQCESDR 
CQNOTXT 
CQLPASRH 
CQFIRST 
CMRELFLG 
CQESD 
CQNOLNG 


CQDELINK 
CQLIB 
CQNOEND 
CQINPUT 
CQENTRY 
CQNOLNTX 
CMSTATUS 
CQPRTOPN 
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Description 

X'10" SYSLIB DCB passed 
X'20" Processing incore SYSLIN 

X'40" Entered at IEWLOAD. Identification wanted 


Assorted flags: 


X'O1' ESDs have been encountered 
X'02' MOD card has been encountered 
X'04" Execution not scheduled 

X'08" Mini-CESD built 

X¥'10" MVS operating 

X'*20"' Common received 

X'*40" SYSTERM open 

X'80"' Identification accomplished 


System type saved by HEWLDLIB 

Register save area used by HEWLDLIB 
Pointer to chain of extents 

Error bit map 

Pointer to errors encountered during open 
Free RLD entry chain (8 bytes/entry) 

Free CESD entry chain (22 bytes/entry) 
Entry point address to loaded program 
Translate control table 

BLDL pointer 

Pointer to CXD addresses 

Free storage chain 

Length of module currently being processed 
Starting point for object module 

Pointer to load chain entry to be freed 
CESD line address of the entry point name 
Previous element in a chain for insert-delete 
Temporary chain for ESDs in a load module 
CESD register save area for HEWLDREL 


Type 0 - Section definition - chain pointer 

Index point for the vector table 

Type 1 - Label definition - chain pointer | 
Type 2 - External reference - chain pointer ) 
Type 3 - Label reference - chain pointer 

Type 4 - Private code - chain pointer 

Type 5 - Common - chain pointer 

Type 6 - Pseudo register - chain pointer 

Type 7 - Null entry - chain pointer 


ESDID counter 

Current line count for SYSPRINT 

Number of BLDL entries 

Horizontal byte count in print record 
Number of extents 

Autocall and load module processor flags: 


X'01' Keep some text from this record 

X'02" Delete some text from this record 
X'04" Autocall is in process 

X'08" CESD has been received for load module 
X'10' Text has been received 

X'20" LPA resolution possible 

X'*40" First record from load module was CESD 


Relocation and object module processor flags: 


X'01" ESD routine is caller to ID translate rtn 
X'02' Length not yet received from current 
CSECT 

X'04' Delinking if required for common 

X'08' Resolution from SYSLIB in process 

X'10" End card has been received 

X'20" Input has been received 

X'40" RLD is for entry point 

X'80'" Text received for no-length CSECT 


Loader status flag: 
X'01" Print DCB allocated for 


HEWLDCOM DSECT - Communication Area 


This document contains restricted materials of IBM. © Copyright IBM Corp. 1972,1983 


LY26-3922-0 


Offset 
Decimal Hex Length Symbol 


CQLIBOPN 
CQABORT 
CQREJOPT 
CQOPNERR 
CQRETURN 
CQMSGSAV 
CQPRTDCB 
461 icD 1 CMPRTCTL 
462 1cE 1 CMOPTECT 


Description 

X'02" Library DCB open 

X'04" Abort loading 

X'08" Invalid options are to be printed 

X'10" Errors were encountered during open 
X*20°" Caller to error rtn must regain control 
X"40" Request open exit to save error messages 
X'80" Print DCB is open 

Index for printer carriage control 

Count of invalid options to be printed 


Figure 34 (Part 3 of 3). HEWLDCOM DSECT 


Notes to Figure 34: 


~ Communication Area 


1. Symbols in parentheses are equated to preceding symbol. 


2. Locations CMMAINPT through CMFLAG4é are initialized from 
locations INITMADR through INFLAG4 in INITMAIN (Figure 36 on 
page 85) by HEWLDIOC. 


3. Locations CMBITMAP through CMOPTECT are initialized to zero 
by HEWLDIOC. 


HEWLDDEF 


HEWLDDEF is a static CSECT that defines default options and 
ddnames to be used by the loader. 


During loader execution, the default values are moved to dynamic 
storage (CINITMAIN), where they are modified by the parameter 
list values passed internally. The HEWLDDEF CSECT is described 
in Figure 35 on page 84. 
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Dec Hex 
ll 


alternate DDNAME for 


SYSLOUT 

8 

alternate DDNAME for 

SYSLIN 

16 

alternate DONAME for 

SYSLIB 
24 
default SIZE value 

28 
32 





*“Correspond to CMPRMELG flags. See Figure 34 
Figure 35. HEWLDDEF CSECT 
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Offset 
Decimal Hex 
0 0 
72 48 
76 4c 
80 50 
88 58 
96 60 
104 68 
112 70 
120 78 
128 80 
132 84 
136 88 
138 8A 
139 8B 
140 &C 
144 90 
148 94 
152 98 
156 9¢ 
160 AO 
164 AG 
176 BO 
188 BC 
192 c0 
200 C8 
456 1c8& 
Figure 36. 


Length Symbol 


72 
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_ 
nN 


12 
4 

8 
256 
VL 


Description 


INITSAVE Initial save area 

INITMADR Variable conditional GETMAIN storage address 

INITMSIZ Variable conditional GETMAIN storage size 

INITPRNT ddname for diagnostic message data set 

INITLIN ddname for primary input data set 

INITLIB ddname for autocall library data set 

INITTERM ddname for SYSTERM data set 

INITNAME Parameter list entry point name 

INITPGMN Program name 

INLINDCB Address of passed SYSLIN DCB 

INLIBDCB Address of passed SYSLIB DCB 

INITPARM Parameter flags and error flags 

INFLAGS Assorted flags 

INFLAG4 Assorted flags 

INITSPIE Pointer to previous SPIE for "SIZE=" SCAN 

INITSCAN Scan pointer save area for 'SIZE=" SPIE 

INITDUM Save word for register during size processing 

INITREJL End of rejected options list 

INITRMIN Minimum size request for variable conditional 
GETMAIN 

INITRMAX Maximum size request for variable conditional 
GETMAIN 

INITGTML Parameter list area for variable conditional 
GETMAIN 

INITEXTR Parameter list area for Extract 

INITEXAD Address of TCB TSO field from Extract 

INITDBLW Doubleword for parm ‘SIZE’ conversion 

INITRTAB Translate and test table for option scan 

INITREJP Rejected options buffer 


INITMAIN DSECT Definition 


Note to Figure 36: 
Locations CMMAINPT through CMFLAG4 in HEWLDCOM Cthe 


communication area Figure 34 on page 81) are initialized from 
locations INITMADR through INFLAG4 in INITMAIN. 
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RLD Table Entry ) 









Loader - assigned address of address constant in text (3 bytes) 


Flagfield - FXXXLLST (1 byte) 
FXXX - type of adcon 


x000 - A-type adcon 
x001 - V-type adcon 
0010 - displacement pseudo register 
0011 - accumulative pseudo register 


Note: F=1 - use absolute relocation constant for relocation 


LL 


Ol - two bytes 
10 three bytes 
11 - four bytes 


length of adcon 


S - direction of relocation 

0 - add the relocation constant 

] - subtract the relocation constant 
T ay 


not used by the Loader; input value is retained ) 


Address of next entry on this RLD chain. 
O if end of chain. (4 bytes) 


Figure 37. RLD Table Entry 








Translation Control Table 


Address of extent allocated for the translation 
table. Each entry is initialized to zero (4 bytes) 








Note: This table is defined in the communications area (HEWLDCOM) 
at location CMTRCTRL. 


Figure 38. Translation Control Table 
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( Translation Table Entry 
Built by the ESD Processor 






Address of CESD entry (31 bits) 


Flag (1 bit) for CESD entry for ER 
0 = normal (relative) relocation required 
1 = special (absolute) relocation required 


A translation table extent contains 
32 of these entries. The Loader can allocate 
a maximum of 32 extents. When allocated, 


an extent is initialized to zero. 


Note: 


Figure 39. Translation Table 
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DIAGNOSTIC AIDS 
} 


This section contains information that may be useful in 
diagnosing difficulties with the loader program. Included are: 
register contents at entry to routines (Figure 40), error code 
definitions (Figure 41 on page 90), an example of a module map 
(Figure 42 on page 91), and a list of serviceability aids 
available with the loader. To use this section, refer to 

Figure 20 on page 61 through Figure 24 on page 67 which show the 
logic flow, and Figure 25 on page 73 which shows data area 
usage. 


Note: At the entry point to each module, register 13 contains the save area address 
and register 14 contains the return address. 


Module Entry Point Register Contents 

HEWLCTRL 1 - address of parameter list 

HEWRELO HEWLRELO 
HEWLESD 


— 
— 


- address of communication area 


ID of first ESD item other than LD 
length of ESD information 

address of ESD information 

address of communication area 


Text ID 

displacement address of text P| 
length of text 2 
address of text in object module buffer 

address of communication area 


_ 


HEWL TXT 


-_ 


HEWLMOD - length of MOD information 
- address of MOD information 


address of communication area 


oy 
{ 


HEWLRLD - length of RLD information 
address of RLD information 


address of communication area 


—_ 
I 


HEWLEND - ID of entry point Cif present) 

- address of entry point Cif present) 

- address of symbolic entry point name Cif 
present) 


address of communication area 


— 
! 


TRANSID - ESD ID to be translated 


address of communication area 


_ 
I 


HEWLERTN ~ starting address of RLD chain 
- CESD entry address to be used for relocation 


address of communication area 


— 
{ 


HEWLMAP - address of CESD entry to be mapped 


address of communication area 


j_ 
| 


KHEWLCNVT - binary quantity to be converted 


address of communication area 


2 j= — 6 bt WO m Ul — OOo yi m= OO ~1 — OO ~/ m OO “IO U1 — OO ~7 U1 
| 


~~ 
{ 


Figure 40 (Part 1 of 2). Register Contents at Entry to Routines 
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Module 
HEWLLIBR 


HEWLIOCA 


HEWLIDEN 


Entry Po 
HEWLODE 


HEWERROR 


HEWACALL 
HEWBTMAP 
HEWLIOCA 
HEWLOAD 


OPENEXIT 


HEWBUFFR 


HEWLREAD 


HEWOPNLB 
HEWLPRNT 
HEWTERM 

HEWPRIME 


HEWL IDEN 
IDMINI 


Figure 40 (Part 2 of 2). 


int Register Contents 
11 - address of communication area 
15 - entry point address 
0 - error message code 
1 - pointer to qualifying information Cif it 
exists) 
11 - address of communication area 
15 - entry point address 
11 - address of communication area 
15 - entry point address 
11 - address of communication area 
15 - entry point address 
1 - address of parameter list 
15 - entry point address 
1 - address of parameter list 
15 - entry point address 
1 - address of DCB 
11 - address of communication area 
12 - base address of HEWLIOCA 
10 - address of DCB 
11 - address of communication area 
15 - entry point address 
For Object and Load Modules 
11 - address of communication area 
15 - entry point address 
For Load Modules 
a. read control/RLD record 
0 - zero 
b. read text records 
0 - length of text record 
1 - address of text 
Cc. read text and control/RLD 
0 - complement of length of text 
1 - address of text 
11 - address of communication area 
15 - entry point address 
11 - address of communication area 
15 - entry point address 
11 - address of communication area 
15 - entry point address 
11 - address of communication area 
15 - entry point address 
11 - address of communication area 
5 - starting address for mini-CESD 
10 - upper limit of storage available 


Register Conte 


nts at Entry to Routines 
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ERROR CODE DEFINITIONS 
Figure 41 contains the loader error codes listed in the order of 


their bit positions in the error-bit map. (The codes are also 
listed in DSECT ERCODES in CSECTs HEWLIOCA, HEWLRELO, HEWLLIBR, 


and HEWLIDEN.) 


Error 

Code Definition Sev Message 
ERRELO1 Unresolved external reference (NOCALL specified) 1 IEW1001 
ERENTR1 No entry point received 1 IEW1161 
ERINPT8& Card received not an object record 1 IEW1141 
ERINPT10 No END card received 2 IEW1182 
ERINPT2 Invalid length specified 2 IEW1082 
ERRELO2 Unresolved external reference 2 IEW1012 
ERINPT4 Doubly defined ESD 2 IEW1102 
ERINPTS5 Invalid 2-byte adcon 2 IEW1112 
ERINPT?7 Invalid ID received 2 IEW1132 
ERINPT9 Invalid record from object module 2 IEW1152 
ERINPT1 Block size is invalid 2 IEW1072 
ERINPT11 Common exceeds size of CSECT with same name 2 IEW1232 
ERINPT12 Invalid 3-byte adcon 2 IEW1262 
ERINPTS3 No text received 3 IEW1093 
ERENTR2 Entry point received but not matched 3 IEW1173 
ERIOUT4 I/O error while searching library directory 3 IEW1053 
ERINPT6 Invalid record from load module 3 IEW1123 
ERIOUTS Unacceptable record format (variable on input) 4 IEW1044 
ERIOUT1 ddname cannot be opened 4 IEW1024 
ERIOUT2 ddname had synchronous error 4 ITEW1034 
ERSIZE2 Available storage exceeded 4 IEW1194 
ERSIZE3 Too many external names in input module 4 IEW1204 
ERIDEN1 Identification failed; duplicate program name 4 IEW1214 
ERIDEN2 Identification failed 4 IEW1224 
Figure 41. Internal Error Code Definitions 
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Module Map Format 

Map heading Name Addr Name Type Addr Name Type Addr Name Type Addr 

CSECTs, entry points) Main 9000 ENTRY LR 9050 ENTRY2 LR 9100 SUBI * sD A000 
SUB2* A100 


Common entry $ BLANKCOM CM A200 


Pseudo Register IHEQINVY PR 00 IHEQERR PR 04 IHEQTIC PR 08 IHEQLWF PR OC IHEQLWO 


information 


IHFQSLA  =-PR 14 


Length of loaded TOTAL LENGTH 2000 


IBM Corp. 


1972,1983 





program 
Entry of loaded ENTRY ADDRESS 9050 
program 
Notes: 
e Name * denotes a module included from the SYSLIB data set. 
e Name ** denotes a module included from the link pack area. 
e Name *** denotes a module pointed to by a MOD record. 
e The map entries are made as addresses are assigned, so the 


map reflects the order of ESD entries in the CESD. 


Figure 42. Module Map Format Example 


SERVICEABILITY AIDS 


Following are serviceability aids provided in the loader. 


The control section, HEWLDDEF, contains the loader option 
default values. It is resident in load module HEWLOADR. 


A storage dump will typically produce information on the 
nature of the error. Register 11 will contain a pointer to 
HEWLDCOM, and register 12 will contain the base register 
associated with the CSECT in control. 


All nine save areas are forward and backward chained. 
Lower-level save areas will be printed. A hexadecimal "FF" 
in word 4 of the save area indicates that the routine 
represented by the save area has returned control. 


Input/output control information is contained in the loader 
communication area. This information consists of the DECB 
address, the buffer locations, the block size, the logical 
record length, the blocking factor, the number of records 
left in the buffer, the address of the current record, and 
the associated switches. See Figure 37 on page 86 for the 
layout of HEWLDCOM. 


Appropriate diagnostic messages are produced when an error 
has been detected. The message has a specific number and, 
where appropriate, lists the data in error. The message 
number and text are listed by HEWLLIBR at the end of 
loading. (Figure 47 on page 97 is a list of these 
messages.) 


A module map (CMAP) is provided to furnish information 
concerning the structure and contents of the program. 
Figure 46 on page 96 is an example of a map listing. 


The loader uses the SYNADAF to obtain information regarding 


permanent I/0 errors and lists the information on the 
SYSLOUT data set. 
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APPENDIX. ERROR MESSAGES, ETC, 
This appendix contains a list of error messages and the routines 
and CSECTs in which they originate, a list of loader input 
conventions and restrictions, and detailed descriptions of input 
record formats. (The input record formats are the same as for 
the Linkage Editor Programs.) In addition, the compiler/loader 
interface is described for the processing of the data sets 
passed to the loader. 
Figure 43 lists the loader diagnostic messages. Each message 
contains a severity code in the final position of the message 
code. These severity codes are defined as follows: 


0 indicates a condition that will not cause an error during 
execution of the loaded program. 


1 indicates a condition that may cause an error during 
execution of the loaded program. 


2 indicates an error that can make execution of the loaded 
program impossible. 


3 indicates an error that will make execution of the loaded 
program impossible. 


4 indicates an unrecoverable error. Such an error causes 
termination of loading. 


Message | Message Issuer 

Number Text Routine Issuer CSECT 

TEW1001 Warning - Unresolved external reference HEWACALL HEWLLIBR J 
CNOCALL speci fied) 


IEWIO12 Error - Unresolved external reference HEWACALL HEWLLIBR 
ITEW1024 Error - Ddname cannot be opened HEWLIOCA HEWLIOCA 
ITEW1034 Error - Ddname had synchronous error SYNAD HEWLIOCA 


IEW1044 Error - Unacceptable record format OPENEXIT HEWLIOCA 
(variable on input) 

IEW1053 Error ~ I/0 error while searching HEWACALL HEWLLIBR 
library directory 


ITEW1132 Error - Invalid ID received HEWLRLD HEWLRELO 
HEWLTXT HEWLRELO 
HEWLEND HEWLRELO 
TRANSID HEWLRELO 





Figure 43 (Part 1 of 2). Error Message/Issuer Cross-Reference Table ) 
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Message Message Issuer 

Number Text Routine Issuer CS=CT 

TEW1141 Warning - Card received not an object HEWLRELO HEWLRELO 
record 

IEW1152 Error - Invalid record from object HEWLRELO HEWLRELO 
module 


IEW1161 Warning ~- No entry point received HEWACALL HEWLLIBR 


IEW1173 Error - Entry point received but not HEWACALL HEWLLIBR 
matched 


IEW1182 Error ~- No END card received HEWLRELO HEWLRELO 



























IEW1194 Error - Available storage exceeded HEWBUFFR HEWLIOCA 
HEWLESD HEWLRELO 
HEWL END HEWLRELO 
HEWL TXT HEWLRELO 
HEWACALL HEWLLIBR 
HEWLODE HEWLLIBR 
HEWLIDEN HEWLIDEN 





IEW1204% Error - Too many external names in input TRANSID HEWLRELO 
module 

IEW1214 Error - Identification failed - HEWLIDEN HEWLIDEN 
duplicate program name found 










IEW1224 Error - Identification failed HEWLIDEN HEWLIDEN 


ITEW1232 Error - Common exceeds size of CSECT MATCHCM HEWLRELO 
with same name 
IEW1262 Error - Invalid 3-byte adcon HEWLERTN HEWLRELO 


IEW1991 Error - User program has abnormally HEWLCTRL HEWLCTRL 
terminated 


Figure 43 (Part 2 of 2). Error Message/Issuer Cross-Reference Table 





INPUT CONVENTIONS 


Input modules Cobject or load) to be processed by the loader 
must conform with a number of input conventions: 


e All text records of a control section must follow the ESD 
record containing the SD or PC entry that describes the 
control section. 


e The end of every input module must be marked by an end 
indication CEND record in an object module, EOM flag ina 
load module. ) 


e Any RLD item must be read after the ESD items to which it 
refers and after the TXT item in which it is positioned. 


° CApplicable only to FORTRAN IV language processing.) Once a 
BLOCK DATA subprogram has been received, any following named 
common referencing it must not specify a longer length. 


e Because each control section 15 assigned an address as it is 
encountered in the input stream, any control section 
appearing between the ESD for a 'no-~length' CSECT and the 
END card for that 'no-length' CSECT «will have an erroneous 
address assigned. CA "no-length' CSECT is a control section 
whose length is defined on the END card.) 
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e Each record of text and each LD or LR type ESD record must 
refer to an SD or PC entry in the ESD. 


° The position pointers of every RLD record must point to an . ) 
SD or PC entry in the ESD. 


° No LD or LR may have the same name as an SD or CM. 


e The loader accepts TXT records that are out of order within 
a control section. TXT records are accepted even though 
they may overwrite previous text in the same control 
section. The loader does not eliminate any RLD records that 
correspond to overwritten text. 


° During a single execution of the loader, if two or more 
control sections having the same name are read in, the first 
control section is accepted; the subsequent control sections 
are deleted. 


e The loader interprets common (CM) ESD items (blank or with 
the same name) as references to a single control section 
whose length is the maximum length specified in the CM items 
of that name Cor blank). No text may be contained in a 
common control section. 


e (Applicable only to Assembler language programming.) When 
control sections that were or are part of a separately 
assembled module are to be replaced, A-type address 
constants that refer to a deleted symbol will be incorrectly 
resolved unless the entry name is in the same position 
relative to the origin of the replaced control section. If 
all control sections of a separately assembled module are 
replaced, no restrictions apply. 


° The MOD record must physically precede all ESD records for 
an internal object module and logically replace all text 
records. If a MOD record appears as the first record of an 
internal object module, all succeeding text records are 
ignored until an END statement has been processed. A MOD wail 
record is ignored if it appears outside an internal object 
module, if it appears after other records have been 
encountered for a module, or if its byte count is zero. 


INPUT RECORD FORMATS 


Figure 44 through Figure 56 on page 105 show input record 
formats. 


SYM Input Record (Card Image) - Ignored by the Loader 


5-10 11,12 13-72 73-80 





Not used 
TESTRAN data 
Number of bytes of TESTRAN data 
Blank 
SYM 
12-9-2 (0000 0010) 
Figure 44. SYM Input Record (Card Image)—Ignored by the Loader J 
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ESD Input Record (Card Image) _ 


ESD Data -- see below Not used 


Blank if all ESD items are LD 
ESD IDENTIFIER of first ESD item (other than LD) 





Blank 


Number of bytes of ESD data 
Blank 


ESD 


12-9-2 (0000 0010) 


ESD Data Item 


Zero - if length is on END card. 

Length of control section (if type is: SD, PC, CM) 

Identifier of SD entry for LD or LR 

Blank if type is ER, WX, or 06 for 'never-call' from PL/I compiler 





Length of pseudo-register (PR) 


Alignment Factor (PR) } 07 — doubleword alignment 
03 — word alignment 
01 —halfword alignment 
00 —- byte alignment 


AMODE/RMODE/RSECT data (SD, PC) 


X X X X not used 
R RSECT information (ignored) 
R RMODE data 
0 =24 
1=ANY 
A A  AMODE data 
00. 01 = 24 
10=31 
11=ANY 
Blank (CD, ER, CM, NULL, WX) 


24-bit address (SD, PC, LD) 


Type - Hex (00 SD, 01 LD, 02 ER, 04 PC, 05 CM, 06 PR, 07 = NULL, 0A = WX) 


Name -- when type is: SD, LD, LR, ER, CM, PR, WX 
Blank -- when type is: PC or blank CM. 


Figure 45. ESD Input Record (Card Image) 
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Text Input Record (Card Image) 


Not used 





Text data (machine-language code) 
ESD Identifier of SD for control section of this text 
“Blank 
Number of bytes of text data 


Blank 


24-bit address of first byte of text data 








Blank 


IXT 


12-9-2 (0000 0010) 


Figure 46. Text Input Record (Card Image) 
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RLD Input Record (Card Image) 


Not used 
RLD data - see below 
Blank 


Number of bytes of RLD data 


Blank 


RLD 


12-9-2 (0000 0010) 


RLD Data Item 


Assigned address of address constant 









Flag field -- (TTTTLLSTn) 


TTTT = type S = Direction of relocation 

0000 = non-branch 0 = positive (+) 

0001 = branch 1 = negative (-) 

0010 = pseudo register displacement value Tn = type of next RLD item 

0011 = pseudo register cumulative length 0 = next RLD item has a different R or P 
LL = length of address constant pointer; they are present in the next item. 
Ol = 2 bytes 1 = next RLD item has the same R and P pointers, 

ey 10 = 3 bytes hence they are omitted 

11 = 4 bytes 


Position pointer (P) - ESDID of SD for control section that contains the address constant 


Relocation pointer (R) ~ ESDID of CESD entry for the symbol being referred to, Zero (00) if type = PR cumulative length 


Figure 47. RLD Input Record (Card Image) 
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END Input Record - Type | (Card Image) 


IDR data, ignored by the Loader 





Control section length for control section whose length 
was not specified in SD ESD item. Byte 29 is binary 
zero rather than a blank if length is present. 

Blank 


ESDID of SD item for this control section that contains the entry point address specified in bytes 6 — 8. 
Blank , 
24-bit address of entry point (optional) 


Blank 


END 





12-9-2 (0000 0010) 


Figure 48. END Input Record—Type 1 (Card Image) 








END END Input Record - Type 2 (Card Image) _ Record - Type 2 (Card Image) aay 


IDR data, ignored by the Loader 


Control section length for control section whose length 
was not specified in SD ESD item. Byte 29 is binary 
zero rather than a blank if length is present. 


Blank 
= Symbolic entry point name (optional, 


Blank 


END 


12-9-2 (0000 0010) 


Figure 49. END Input Record—Type 2 (Card Image) 
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SYM Record = ( Load Module) Module) 


SYM data and ESD data (ESD type SD, CM and PC items) - (maximum of 240 bytes) 







Count - in bytes, of SYM and ESD data (2 bytes) 


Subtype - specifies information for TESTRAN - (1 byte) 

1000 0000 - this SYM record contains ESD items (SD, PC or CM) fram 
a load module that was not "under test". The test 
option was not specified when it was link edited. 


0000 0000 - this SYM record is not the above type. 


Identification - specifies this isa SYM record -- 0100 0000 (1 byte) 


Figure 50. SYM Record (Load Module)—Ignored by the Loader 
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CESD CESD Record - (Load Module) (Load Module) 


up to 240 Pop te 240 byte oF ESD dete of ESD data [jae 











ESD data - for detailed information see below. 


Count ~ in bytes, of ESD data (2 bytes) 
ESDID of first ESD item (2 bytes) 


Spare - 2 bytes of binary zeros 


Flag (1 byte) 
OXXX XXXX — byte 12 of CESD data items contains 
segment numbers 
1XXX XXXX — byte 12 of CESO data items contains 
AMODE/RMODE data 


Identification -- 0010 0000 -- (1 byte) 


CESD Data (Load Module) 


ID/ length - length (3 bytes), when type is: SD, PC, CM or PR 
ID (2 bytes), when type is LR 
Zero (3 bytes), when type is ER, WX, or Null 


Alignment factor (PR) | 07 — doubleword 


03 — fullword 
01 — halfword 
00 —- byte 
Zero (ER, WX, Null) 
If flag byte (byte 1) indicates CESD data items contain 


segment nurmibers - segment number (SD, PC, CM, LR) 


If flag byte (byte 1) indicates CESD data items contain AMODE/RMODE data — 
X X X X not used 
R RSECT information (ignored) 
R RMODE data 
0=24 
1=ANY 
A A  AMODE data 
00,01 =24 
10=31 
11=ANY 


(SD, PC) 


Address ~ linkage editor-assigned address of this symbol. Zero when type is ER, WX, or Null (3 bytes) | 


Type - (1 byte) Section definition (SD) XXXXxX000 
Label reference (LR) XXXXX011 
Private code (PC) XXXXX100 


Private code marked delete 
(ENTAB and SEGTAB control sections) XXX1 X100 


Common (CM) XXXXXI101 

Null XXXXX111 

External reference (ER) XXXXXO10 

Weak external reference (WX) XXXX1010 4 
Pseudo register (PR) XXXXX110 X's may be 1 or O 


Symbol - The 8-character external name — Zero when type is Null. 
Blanks if blank common or PCs other than SEGTABs and ENTABs 





Figure 51. CESD Record (Load Module) 
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Scatter - Translation Record 


pou} as 4-1023 Up to and including 1020 bytes 


Data - may contain translation table, translation table and scatter table, or scatter table only 












Count - in bytes, of data field 
Zero - one byte of binary zeros 


Identification - identifies this as a scatter-translation record - bit configuration is: 0001 0000 


LL ttt | 


Padding (2 bytes) - if necessary, to force fullword boundary alignment of scatter table. 


Translation Table 


Pointer (2 bytes) - to the scatter table entry that contains the address of the control section 
containing this CESD entry. 
Number of translation table entries = number of CESD entries +1. 
Pointer will be zero if its corresponding CESD entry is not SD, PC, CM, or LR. 


Zero - 2 bytes of binary zeros 


Scatter Table 


U | fT 


Assigned address (3 bytes) - of a control section (SD. PC or CM) 


Flags (1 byte) 
x XXX x not used 
R RSECT information 
0 =not read-only 
1 =read-only 


R RMODE data 
0=24 
1=ANY 


H Hierarchy (OS/MVT) 
0 = processor storage 
1 = 2361 storage 


Zero - 4 bytes of binary zeros 


Translation Table and Scatter Table 


n 








Scatter data 
Padding (2 bytes) if necessary to align scatter table to a fullword boundary. 


Translation data 


Figure 52. Scatter/Translation Record—Ignored by the Loader 
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Control Record - (Load Module) ) 


Length of text record and/or length of control section - specifies the length of 


the control section (in bytes) to which the text in the following 
record belongs, or the number of bytes of a control section contained 
in the following text record (2 bytes) 











CESD entry number - specifies the composite external symbol dictionary entry that 
contains the control section name of the control section of which this text is a 
part (2 bytes) 


Channel Command Word (CCW) - that could be used to read the text record that follows. The data address field 
contains the linkage editor assigned address of the first byte of text in the text record that follows. The 
count field contains the length of the succeeding text record. 


Count — contains 2 bytes of binary zeros. 
Count - in bytes, of the control information (CESD ID, length of control section) following the CCW field. 


Count — (1 byte) of RLD and/or CTL/RLD records following next text record. 
Spare — contains 2 bytes of binary zeros. 


Identification - specifies that this is: 
eA contro! record - 0000 0001 
e The control record that precedes the last text record of this overlay segment - 0000 0101 (EOS) 


e The contro! record that precedes the last text record of the module - 0000 1101 (EOM) 
(1 byte) 


Figure 53. Control Record CLoad Module) 
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Relocation Dictionary Record = (Load Module) 


Record > caso lenth cone between Mand 256 | can be between 24 and 256 








RLD data -- see below 


Spare - contains 8 bytes of binary zeros 
Count - in bytes of the relocation dictionary information following the spare 8 byte field (2 bytes) 


Count - contains two bytes of binary zeros 


Spare - contains three bytes of binary zeros 


Identification - specifies that this is: (1 byte) 
e A relocation dictionary record - 0000 0010 
e The last record of this segment - 0000 0110 


e The last record of the module ~ 0000 1110 
Address - linkage editor 


assigned address of 
the address constant 


(3 bytes) 


RLD Data 








Flag - (1 byte) When byte format is xxxxLLST, 

specifies miscellaneous information as follows: 

xxxx specifies the type of this RLD item (address constant). 

0000 -- non-branch type in assembler language, DC A (name) 

0001 -- branch type in assembler language, DC V (name) 

0010 -- pseudo register displacement value 

0011 -- pseudo register cumulative displacement value 

1000 and 1001 -- this address constant is not to be relocated because it refers to an unresolved symbol. 

LL specifies the length of the address constant. 

01 -- two bytes 

10 -- three bytes 

11 -- four bytes 

S specifies the direction of relocation. 

0 -- positive 

| -- negative 

T specifies the type of the next following RLD item. 

0 -- the following RLD item has a different relocation and/or position pointer. 

1 -- the following RLD item has the same relocation and position pointers as this and therefore contains 
only the flag and address fields. 


Position pointer - contains the entry number of the CESD entry that indicates 
which control section holds the address constant (2 bytes). 


Relocation pointer - contains the entry number of the CESD entry that indicates which symbol value 
is to be used in the computation of the address constant's value (2 bytes). 
Oif PR cumulative length or if ENTAB CSECT. 


Figure 54. Relocation Dictionary Record CLoad Module) 
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Control and Relocation Dictionary Record - (Load Module) ) 


*Length of 
control 
section or 
text record 


(2 bytes) 





“CESD entry number 
(2 bytes) 


Address 
Flag 
Address (3 bytes) 
Flag (1 byte) 
Position pointer (2 bytes) 
Relocation pointer (2 bytes) 
Channel Command Word (8 bytes) 
‘Count, in bytes, of RLD information (2 bytes) 


Count, in bytes, of control information following the last RLD address field. 
* The control information contains the ID and length of control sections in the 


id 
following text record (2 bytes). a 
Count (1 byte) of RLD and/or CTL/RLD records following next text record. 


Spare (2 bytes) 


Identification (1 byte) - specifies that this record is: 

So e Acontrol and RLD record - 00000011 - (it is followed by a text record) 
e Acontrol and RLD record that is followed by the last text record of a segment - 0000 0111 (EOS) 
e Acontrol and RLD record that is followed by the last text record of a module - 0000 1111 (EOM) 


Note: For detailed descriptions of the data fields see Relocation Dictionary Record, and Control Record. 


The record length varies from 20 to 256 bytes. 


Figure 55. Control and Relocation Dictionary Record (Load Module) 
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CSECT Identification Record - (Load Module) 
c Poff 2 3-255 record length 7 to 256 bytes 


IDR data ~ (maximum of 253 bytes) 


Sub-Type Indicator ~ (1 byte) - specified type of 


IDR data contained on this record (bits 1-3 reserved) 


Data supplied by IMASPZAP XXXX0001 
Linkage Editor data XXXX0010 
Translator-supplied data XX XX0100 
User (System)-supplied data 
(from IDENTIFY function) XX XX 1000 : 
Indicates the last IDR of this load module IXXXXXXX X's may be | or O 


Count, in bytes, of IDR data in this record, including this field (value range 6 to 255). 


Identification - indicates that this is a CSECT Identification record -- 1000 0000. 


Figure 56. Record Format of IDRs (Load Module)—lIgnored by the Loader 


COMPILER/LOADER INTERFACE FOR PASSED DATA SETS 


If the loader is to process an internal SYSLIN data area (that 
is, a data area residing in virtual storage and consisting of 
contiguous object module records prepared by a compiler) and/or 
an open SYSLIB data set, the compitler/loader itnterface described 
here is used. The description includes the format of the DCB 
list, the control block or DCB parameters that must be specified 
for the data area or data set, the format of an internal data 
area consisting of either fixed- or variable-length records, and 
the format of the MOD record. 
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DCB List ) 


Pointed to by the fourth entry in the parameter list passed to the Loader 


SYSLIB DCB - may 
contain the address 

of an open SYSLIB DCB 
(4 bytes). 


Zero - 4 bytes of binary zeros. 


Zero - 4 bytes of binary zeros. 


SYSLIN control block - may contain the address of a 
SYSLIN control block which describes an internal 
data area prepared by a compiler (4 bytes). 


Zero - 2 bytes of binary zeros. 





Number of entries following (2 bytes). 


Figure 57. DCB List J 


Internal SYSLIN Control Block 


The SYSLIN control block?* used to describe an internal input 
data area should have the following fields initialized: 


DCBDEVT = 0, to describe an internal data area and to indicate 
that an internal SYSLIN control block was passed. 

DCBRELAD = starting address of the internal object module 
records. 

DCBBLKSI = length of the entire internal data area. 

DCBRECFM = FB, if the internal object module records are in 
fixed-length format. 
VB, if the internal object module records are in 
variable-length format. 

DCBLRECL = length of a logical record if the data set records 
are in fixed-length format. 

23 The control block has the format and content of a SYSLIN 

data control block, but is not to be considered a data ] 


control block because there is no data management activity 
in connection with this control block. 
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Open SYSLIB DCB 


The open SYSLIB DCB passed to the loader should have the 
following DCB fields initialized: 


DCBDSORG = PO 


DCBMACRF = R 

DCBNCP = 2 

DCBRECFM = U, if the SYSLIB data set contains load modules. 
F or FB, if the SYSLIB data set contains object 
modules. CIn this case, values for the fields 
DCBLRECL and DCBBLKSI should also be Specified.) 

DCBBUFNO = 0 


Exit routine addresses may be specified. Before reading SYSLIB, 
the loader overlays these addresses with the addresses of its 
own routines. The loader also restores these addresses before 
returning to the caller. 


If an open SYSLIB DCB is passed to the loader, SYSLIB is not 
closed by the loader. 


(Logical record length = 72) 





First record 
of data area 
(This record 
should begin 
ona fullword 
boundary. 
should appear 
in the passed 





Nth record 


Second record of data area 


of data area 


Its address 


SYSLIN control! block 
field DCBRELAD.) 


Figure 58. Internal Data Area in Fixed-Length Record Format 
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Block 
Descriptor Descriptor Descriptor Descriptor 
Word Word Word Word 
| amie. al es SS ey 
No of eevee e ee 
: 2 2 





First record Second record nth record 


of data area of data area of data area 









Binary zeros Binary zeros 






Binary zeros 





Length (L1) of first Length (L2) of second Length (Ln) of nth record 


record of data area record of data area of data area plus 
plus descriptor plus descriptor descriptor word (This 
word (This field word (This field field must fall on the 
must fall on a must fall on the fullword boundary 
fullword boundary.) fullword boundary following the end of 
following the end the previous record.) 
of the previous 
record.) 


Figure 59. Internal Data Area in Variable-Length Record Format 
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pifea | s0 11-12 13-16 17-20 21-24 25-28 29-32 33-80 


Not used. 
_*Number of bytes of text 


(optional) (4 bytes). 





*Address of text extent (optional) 
(4 bytes). 


Address of byte following the estimated 
or actual end of text for the last 
control section in the module (4 bytes). 





Main storage address of the first byte of text 

for the first control section in the module. 

This address should be on a doubleword boundary. 
(The Loader assumes that each succeeding control 
section within the module begins on the next 
available doubleword boundary.) (4 bytes) 


Blank (4 bytes), 
Number of bytes of data to be processed in columns 17-32 
(number = 8 or 16) (2 bytes), 
Blank (6 bytes). 
MOD (3 bytes). 


12-9-2 (0000 0010) (1 byte). 





*Note: These two fields define storage that is to be identified as part of the loaded program. They 
are optional , but must occur on at least one of the MOD records in the internal data area if the 
Loader is invoked via the entry points LOADER, HEWLDRGO, or HEWLOAD., Each occurrence of 
these two fields defines a new extent of the program. The values must conform to the rules for 
FREEMAIN parameters, that is, the address must begin on a doubleword boundary and the length 
must be a multiple of 8. 


Figure 60. MOD Record (Card Image) 


IDENTIFY MACRO INSTRUCTION——IDENTIFYING LOADED PROGRAM 


The IDENTIFY macro instruction, when invoked as described below, 
permits the loader to describe a program constructed in subpool 
0 so that the program may later be invoked by a macro 
instruction such as LINK, XCTL, or ATTACH. The IDENTIFY macro 
instruction creates a contents directory entry (CDE) and an 
extent list for the program constructed. These system control 
blocks allow the supervisor to identify the program. 


The addresses and lengths of the program's extents, the entry 
point address, and the program name must be passed to the 
IDENTIFY macro instruction. (The format of the parameter list 
passed by the loader to the IDENTIFY macro instruction is shown 
in Figure 33 on page 80.) The IDENTIFY macro instruction flags 
the CDE that it creates to indicate that the program can be 
invoked by other macro instructions as well as by the LOAD macro 
instruction. Residence of the program in subpool 0 and the 
absence of the program as a load module on an external device 
are also indicated in the CDE. The IDENTIFY macro instruction 
places the CDE on the user's job pack area control queue; it 
also derives the extent list from the parameter list passed to 
it and stores the extent list within the system queue area. 
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When the form of the IDENTIFY macro instruction described below 
is specified, all other operands are ignored. The format is: 


Caw ——[ oearetion [operand 
[symbol] IDENTIFY MF=(E,address of parameter list|(1)) 


where: 


J 





MF= 
indicates the execute form of the macro instruction using a 
remote parameter list. (The format of the parameter list 
passed by the loader is shown in Figure 33 on page 80.) 
The address of the parameter list can be loaded into 
register 1, tn which case MF=CE,(€1)) should be coded. If 
the address is not loaded into register 1, it can be coded 
as an address that is valid in an RxX-type instruction, or 
as one of the registers 2 through 12 that were previously 
loaded with the address. A register can be designated 
symbolically or with an absolute expression, and 1s always 
coded within parentheses. 


Programming Notes: Failure to meet any of the following 
requirements will cause an exit with a return code to indicate 
the reason for unsuccessful completion. The requirements are: 
1. The extent list size must be a positive multiple of 8. 
2. The addresses in the parameter list must be in subpool 0. 
3. The program name should not duplicate a name already on the 
link pack area control queue or the user's job pack area 
control queue. 
4. The entry point must be within one of the extents. ) 


5. The caller must be a nonsupervisory routine. 


6. The extents must be in the user's region in subpool 0, and 
they must begin on doubleword boundaries. 


When the IDENTIFY macro instruction returns control, register 15 
contains one of the following hexadecimal codes: 


Code Meaning 

00 Successful completion. 

04 Program name and address already exist. 

08 Program name duplicates the name of a load module 


currently in virtual storage; CDE was not created. 


0c Entry point address is not within an eligible program; 
CDE was not created. 


14 An IDENTIFY macro instruction was previously issued a 
using the same program name, but a different address; 
this request Was ignored. 


18 Parameter list address is not on a doubleword 
boundary, or the program name specified is already on 
the link pack area control queue or the user's job 
pack area control queue; CDE was not created. 


1¢ Extent list length is negative, not a multiple of 8, 
or the extent addresses are not on doubleword 
boundaries; CDE was not created. 


20 Extents are not in subpool 0; CDE was not created. —) 


110 MV5/7370 Loader Logic 


This document contains restricted materials of IBM. © Copyright IBM Corp. 1972,1983 
LY26-3922-0 


LIST OF ABBREVIATIONS AND ACRONYMS 


C 


adcon address constant 
CcESD composite external symbol dictionary 
CSECT control section 
DECB data event control block 
DSECT dummy section 
EOM end of module 
ESD ID external symbol dictionary identification 
K 1024 
LD label definition 
LR label reference 
PC private code 
PR pseudo register 
P pointer position pointer 
RLD relocation dictionary 
R pointer relocation pointer 
SD section definition 
C TTR relative track and record address on a 
direct-access device 
WX weak external reference 
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INDEX 


[a 


A-type address constant, purpose of 36 
abbreviations and acronyms, dictionary 
of 111 
address assignment 
for common areas) 41 
for external DSECTs 42 
In non-resolution 24-27 
in resolution 28-31 
address constants, relocation of 
description of 37 
introduction to 5 
address list for BLDL information 
purpose of 40-41 
routine that builds the lists 73 
allocation 
of buffers and DECBs' 14-15 
of save areas 12 
of table entries 24 
automatic 
deletion (for CESD type SD) 30-31 
library calls 40 


BLDL list 
format of 73 
purpose of 40-41 
BLDL macro instruction, issuance of 40 
boundary alignment Cfor PR entries) 
description of 42 
introduction to 32 
buffer, allocation of 14-15 


i 


CALL|INOCALL|INCAL option 8 
CESD entry 24, 27 
See also composite external symbol 
dictionary entry 
common (CM) area 
address assignment of 41 
definition of 20 
processing a CM entry 27 
common reference 20 
communication area CHEWLDCOM) 
format of 81 
initialization of 12 
composite external symbol dictionary 
entry 
definition of 18 
internal format 77 
making an entry 24 
processing of 21-32 
record format of 100 
concatenated data sets Con SYSLIN)D 3, 
13 
condensed symbol table 
creation of 44 


112 MVS/370 Loader Logic 


J 
format of 77 
purpose of Ill 


control 
and relocation dictionary record 
format 104 


dictionaries 5 
information processing ll 


record 
description 18 
format 102 


processing 34 
control level tables Croutines) 62-66 
CR 
See common reference 
CSECT Identification Record 
record format 105 
treatment of 20 


[> | 


data area layouts 
address list for BLDL information 73 
communication area (CHEWLDCOM) 8&1 
default and ddname CSECT 
CHEWLDDEF) 84 
INITMAIN work area 85 
data control block (DCB) for SYSLIN, 
SYSTERM, and SYSLOUT data sets, 


construction of 12, 13 ) 
data control block (DCB), alternate for 
SYSLIB 12, 107 
data event control block (DECB), format 
of 78 
DCB list, format of 106 
default and ddname CSECT CHEWLDDEF) 84 
deleting CSECTs 
in ESD processing 30-34% 
in load module input 34, 35 
delinking 38-39 
diagnostic 
aids 88 
register contents at entry to 
routines 88 
dictionary print routine CHEWBTMAP) 
messages 92-93 
diagrams, operation 47-60 
directory, microfiche 70-72 
dummy DSECT, external 
See external dummy section 


END 


processing 39 
record formats) 97 

entry point determination 
checking of 44 
default for preloaded text 34 
in ESD processing 26 


EOM | 
See END 


EP=(Ckeyword) 8 
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ER 
See external reference 
error 
diagnostic dictionary processing 
routine CHEWBTMAP) 
messages 92-93 
internal code definitions 99 
message-issuer cross reference 
table 92-93 
ESD 


See external symbol dictionary 
ESD ID 
definition of 6 
in END processing 39 
in ESD processing 27-28 
in RLD processing 36-37 
in text processing 32-34 
extent 
chain entry format 79 
processing 33 
external dummy section (pseudo register) 
address assignment 42 ; 
definition of 6 
entry processing 
displacement and boundary 
alignment 32 
PR entry 27 
symbol resolution in 32 
function of 21 
external reference CER) 
definition of 20 
entry processing 
match processing 30, 31 
no-match processing 27 
function of 20 
unresolved ER messages 43 
unresolved ER processing 40 
external symbol dictionary CESD) 
definition of 
entry types 21 
identifier 
See ESD ID 
processing 
description of 19-32 
introduction to 10 
operation diagrams for 
record format 94 
EXTRACT macro instruction, issuance 
of 11 


[F | 


final processing 
description of 41 
overview 11 

functions of the loader 1 


[Le | 


general register contents 88-89 


53-55 


[| 


HEWLDCOM Ccommunication area) 
format of 81-84 
initialization of 12 
HEWLDDEF 
data area layout 8&4 
definition 3, 11 
HEWLLIBR 3, 61 
HEWLOAD, entry point for loading with 
identification 44 
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I/0 control-allocation, description 
of 13 
ID-length list 34 
identification of loaded program 
See also program name 
processing 43 
purpose of 11 
saving extent information for 33 
IDENTIFY macro instruction 
issuance of 11, 44 
parameter list 
creation of 44 
format of 80 
record format 105 
treatment of 33 
initialization processing 
description of 1 
operation diagram of 49 
INITMAIN work area, format of 85 
input 
conventions 93 
entry types 24 
description of 18 
introduction to 13 
primary data set 3 
record formats 94-105 
secondary data set 3 
secondary input processing 
description of 41 
internal input data area 
See also passed data sets 
concatenation restriction 4&4 
definition of 3 
format 
fixed-length records 107 
variable-length records 108 
processing 10, 12 
reading of 16 
SYSLIN control block for 12, 106 
internal object module 
See internal input data area 


label 
definition CLD) or reference (LR) 20 
LD and LR processing 
description of 26 
introduction to 22 
reference 20 
when CESD type is CM 31-32 
when CESD type is SD 30 
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language translators 3 
LD 


See label definition 
LETINOLET option 8 
library calls 40, 41 
See also automatic library call 
processor and secondary input 
processin 
load module 
processing 
description of (see also reading 
load module text) 19 
- operation diagram of 58 
RLD buffer, use of 16 
load module processing 
description of 16 
See also reading load module text 
Loader 
data sets 3 
options 7 
organization 61 
structure 3 
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MAP option, processing of 23 
MAP|NOMAP option 8 
map, module, format example of 91 
match processing 29-32 
microfiche directory 70-72 
MOD record 

contents of 19 

input convention 94 

processing 33-34 

record format 109 


Ln | 


NAME=Ckeyword) 
See program name 

no-match processing 
description of 23-33 
tabulation of 24 

null type of ESD entry 21 


fo | 


object and load module processing, 
differences 18 
object module 

allocation for 16 

control dictionaries in 5 
operation diagrams 47-60 
options 7 
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passed data sets, compiler/loader 
interface 105-109 
PC 
See private code 
pointers, RLD Crelocation dictionary 
processing), use of 36-37 
R 


See pseudo register 
preloaded text 
See MOD record 
PRINT|INOPRINT option 8 
private code (PC) 20 
processing control module 
See initialization, I/70, control and 
allocation processor 
program name 
passing to control program 12 
specifying 8 
pseudo register (PR) 
address assignment 42 
definition of 6 
entry processing 
displacement and boundary 
alignment 32 
symbol resolution in 32 
function of 21 


Le | 


Q@-type address constant 
purpose of 37 
use of in pseudo register 
relocation 42 


[LR | 


reading 
load module text 34 
module input 15-16 
readying data sets 12 
register contents at entry to 
routines 88-89 
aids 
register contents at entry to 
routines 89 
relative relocation constant 
definition of 37 
use of 38 
relocating address constants 38 
relocation constant, computing 27 
relocation dictionary CRLD) 
entries, use of 19 
introduction to 6 
processing 
details of 36-37 
introduction to 10 
operation diagram 59 
processor CHEWLRLD) 
for load module 103, 104 
input record 97 
table entry format 8&6 
RESINORES option 8 
secon symbol 29-32 
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See relocation dictionary 
RLD pointers, meaning of 6 


[s | 


scatter/translation record, format 
of 101 
SD 
See section definition 
secondary input processing 
description of 
section definition (SD) 
introduction to 20 
processing an SD entry 26 
symbol resolution for SD entry 30 
serviceability aids 91 
SIZE=Ckeyword) 8 
storage allocation 
for buffers and DECBs 
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